hush debug output
[BackupPC.git] / lib / BackupPC / CGI / Lib.pm
index a1abccf..26aee2a 100644 (file)
@@ -136,8 +136,8 @@ sub NewRequest
 
     # strip Active directory domain in front of user
     $User   = $1 if ( $User =~ /\w+\\(\w+)/ );
-use Data::Dump qw(dump);
-warn "XX User: $User",dump( \%ENV );
+#use Data::Dump qw(dump);
+#warn "XX User: $User",dump( \%ENV );
 
     #
     # Clean up %ENV for taint checking