--- loncom/interface/loncommon.pm 2002/03/28 21:38:53 1.29 +++ loncom/interface/loncommon.pm 2002/03/28 22:15:56 1.30 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.29 2002/03/28 21:38:53 www Exp $ +# $Id: loncommon.pm,v 1.30 2002/03/28 22:15:56 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -367,7 +367,7 @@ sub get_unprocessed_cgi { $value =~ tr/+/ /; $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg; &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) }; } } }