Return to lonlocal.pm CVS log | Up to [LON-CAPA] / loncom |
version 1.6, 2004/06/17 10:15:46 | version 1.7, 2004/09/17 03:00:42 |
---|---|
Line 62 my $DEBUG = 0; | Line 62 my $DEBUG = 0; |
sub Debug { | sub Debug { |
my $msg = shift; | my $msg = shift; |
print STDERR "$msg\n"; | if ($DEBUG) { print STDERR "$msg\n"; } |
} | } |
# Initialization | # Initialization |