Update of /cvsroot/netpass/NetPass/www/htdocs/Admin/Scan
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv25260/www/htdocs/Admin/Scan
Modified Files:
index.mhtml
Log Message:
bug fixes
Index: index.mhtml
===================================================================
RCS file: /cvsroot/netpass/NetPass/www/htdocs/Admin/Scan/index.mhtml,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -d -r1.6 -r1.7
--- index.mhtml 3 Aug 2005 02:44:40 -0000 1.6
+++ index.mhtml 16 Aug 2005 14:04:34 -0000 1.7
@@ -30,9 +30,10 @@
my @reqGroups = ('Admin', 'ScanAdmin', 'Reports');
my ($isReadOnly, $aclROGroups) = $m->comp('/Admin/MemberOf', 'acl' => 'Reports');
-my $readOnly = $isReadOnly ? "disabled" : "";
my ($isAdmin, $aclRWGroups) = $m->comp('/Admin/MemberOf', 'acl' => [ @reqGroups ]);
+my $readOnly = (!$isAdmin && $isReadOnly) ? "disabled" : "";
+
if (! $isAdmin ) {
print $q->p({-class=>'error'},
"Sorry, you don't have access to this form.");
|
