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