version 1.28, 2002/03/23 14:54:16
|
version 1.29, 2002/03/28 21:38:53
|
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:"); |
&add_to_env('form.'.$name,$value); |
unless ($ENV{'form.'.$name}) { &add_to_env('form.'.$name,$value) }; |
} |
} |
} |
} |
} |
} |