From dbc1a4cf69cdc9f9cafe6579249ec122bb7f6007 Mon Sep 17 00:00:00 2001
From: tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Thu, 17 May 2007 22:40:47 +0000
Subject: Fix scoping of the exclusion list in access_control

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@1205 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB/Menu.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/LedgerSMB/Menu.pm b/LedgerSMB/Menu.pm
index 57c83245..dce0be8e 100755
--- a/LedgerSMB/Menu.pm
+++ b/LedgerSMB/Menu.pm
@@ -107,7 +107,7 @@ sub access_control {
     }
 
     my @a = split /;/, $myconfig->{acs};
-    my $excl = ();
+    my %excl = ();
 
     # remove --AR, --AP from array
     grep { ( $a, $b ) = split /--/; s/--$a$//; } @a;
-- 
cgit v1.2.3