version 1.29, 2002/03/28 21:38:53
|
version 1.30, 2002/03/28 22:15:56
|
Line 367 sub get_unprocessed_cgi {
|
Line 367 sub get_unprocessed_cgi {
|
$value =~ tr/+/ /; |
$value =~ tr/+/ /; |
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg; |
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg; |
&Apache::lonxml::debug("Seting :$name: to :$value:"); |
&Apache::lonxml::debug("Seting :$name: to :$value:"); |
unless ($ENV{'form.'.$name}) { &add_to_env('form.'.$name,$value) }; |
unless (defined($ENV{'form.'.$name})) { &add_to_env('form.'.$name,$value) }; |
} |
} |
} |
} |
} |
} |