X-Git-Url: https://git.deb.at/?p=deb%2Fpackages.git;a=blobdiff_plain;f=lib%2FPackages%2FCGI.pm;fp=lib%2FPackages%2FCGI.pm;h=66b442d79b4ec295e45020e31fb2732e95b79702;hp=e15e510f017edd512b27cb53426825844a524be4;hb=f27f1fcc5bffc0696f694e962eb40dbb0c554855;hpb=0490df1e4f11514d016bdbc418321e8d800682e5

diff --git a/lib/Packages/CGI.pm b/lib/Packages/CGI.pm
index e15e510..66b442d 100644
--- a/lib/Packages/CGI.pm
+++ b/lib/Packages/CGI.pm
@@ -4,8 +4,10 @@ use Exporter;
 our @ISA = qw( Exporter );
 our @EXPORT = qw( fatal_error error hint debug msg note
 		  print_errors print_hints print_debug print_msgs
-		  print_notes );
+		  print_notes DEBUG );
 
+# define this to 0 in production mode
+use constant DEBUG => 1;
 our $debug = 0;
 
 our (@fatal_errors, @errors, @debug, @msgs, @hints, @notes);