From 501668f18ff73af21b4f255ffbebb74abb7e1b03 Mon Sep 17 00:00:00 2001 From: Jamie Cameron Date: Fri, 6 Mar 2009 19:11:34 +0000 Subject: [PATCH] Remove useless %in export --- acl/save_acl.cgi | 8 -------- acl/save_group.cgi | 4 +--- acl/save_user.cgi | 4 +--- 3 files changed, 2 insertions(+), 14 deletions(-) diff --git a/acl/save_acl.cgi b/acl/save_acl.cgi index 1b0300f5c..ec8b15112 100755 --- a/acl/save_acl.cgi +++ b/acl/save_acl.cgi @@ -40,14 +40,6 @@ else { # Use user inputs $maccess{'rbac'} = 0 if (defined($in{'rbac'})); &foreign_require($in{'_acl_mod'}, "acl_security.pl"); - if ($in{'_acl_mod'}) { - local $pkg = $in{'_acl_mod'}; - $pkg =~ s/[^A-Za-z0-9]/_/g; - eval "\%${pkg}::in = \%in"; - } - else { - %global::in = %in; - } &foreign_call($in{'_acl_mod'}, "acl_security_save", \%maccess, \%in); } diff --git a/acl/save_group.cgi b/acl/save_group.cgi index a7fbff38c..745414344 100755 --- a/acl/save_group.cgi +++ b/acl/save_group.cgi @@ -118,9 +118,7 @@ else { if ($in{'old'} && $in{'acl_security_form'}) { # Update group's global ACL &foreign_require("", "acl_security.pl"); - %global::in = %in; - &foreign_call("", "acl_security_save", - \%uaccess, \%in); + &foreign_call("", "acl_security_save", \%uaccess, \%in); $aclfile = "$config_directory/$in{'name'}.gacl"; &lock_file($aclfile); &write_file($aclfile, \%uaccess); diff --git a/acl/save_user.cgi b/acl/save_user.cgi index 69238d93e..d729ca350 100755 --- a/acl/save_user.cgi +++ b/acl/save_user.cgi @@ -343,9 +343,7 @@ else { if ($in{'old'} && $in{'acl_security_form'} && !$group) { # Update user's global ACL &foreign_require("", "acl_security.pl"); - %global::in = %in; - &foreign_call("", "acl_security_save", - \%uaccess, \%in); + &foreign_call("", "acl_security_save", \%uaccess, \%in); $aclfile = "$config_directory/$in{'name'}.acl"; &lock_file($aclfile); &write_file($aclfile, \%uaccess);