Return to lonhomework.pm CVS log | Up to [LON-CAPA] / loncom / homework |
version 1.32, 2001/01/11 15:25:46 | version 1.33, 2001/01/12 20:40:23 |
---|---|
Line 117 sub check_date { | Line 117 sub check_date { |
sub handler { | sub handler { |
my $request=$_[0]; | my $request=$_[0]; |
if ( $ENV{'user.name'} eq 'albertel' ) { $Apache::lonxml::debug=1; } | if ( $ENV{'user.name'} eq 'albertel' ) {$Apache::lonxml::debug=1;} else {$Apache::lonxml::debug=0;} |
my (@targets) = &get_target(); | my (@targets) = &get_target(); |