[Netpass-devel] NetPass/www/htdocs/Admin/Scan index.mhtml,1.4,1.5

[jeff m. <jef...@us...>]

Update of /cvsroot/netpass/NetPass/www/htdocs/Admin/Scan
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14964/www/htdocs/Admin/Scan

Modified Files:
	index.mhtml 
Log Message:
minor tweaks

Index: index.mhtml
===================================================================
RCS file: /cvsroot/netpass/NetPass/www/htdocs/Admin/Scan/index.mhtml,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- index.mhtml	19 Apr 2005 01:40:35 -0000	1.4
+++ index.mhtml	4 May 2005 03:27:17 -0000	1.5
@@ -35,17 +35,10 @@
 
 if (! $isAdmin ) {
         print $q->p({-class=>'error'},
-                "Sorry, permission denied.<BR>You must be in one of these groups: ",
-                join(',', @reqGroups));
-	print "<PRE>MemberOf says you are a member of: ", join(',', @$aclRWGroups), "</PRE>";
-	use Data::Dumper;
-	print "<PRE>", Dumper($m->session->{'my_groups'}), "</PRE>";
+                "Sorry, you don't have access to this form.");
         return;
 }
 
-print "aclRO: ",join(',', @$aclROGroups), "<BR>";
-print "aclRW: ",join(',', @$aclRWGroups), "<BR>";
-
 $service = "Nessus" unless ($service eq "Snort") || ($service eq "Nessus");
 
 my $msgs = getMsgs($dbh, $service);