Return to lonnet.pm CVS log | Up to [LON-CAPA] / loncom / lonnet / perl |
version 1.414, 2003/09/17 01:45:14 | version 1.415, 2003/09/17 17:50:49 |
---|---|
Line 4196 sub unescape { | Line 4196 sub unescape { |
return $str; | return $str; |
} | } |
sub mod_perl_version { | |
if (defined($perlvar{'MODPERL2'})) { | |
return 2; | |
} | |
return 1; | |
} | |
# ================================================================ Main Program | # ================================================================ Main Program |
sub goodbye { | sub goodbye { |