--- loncom/interface/lonparmset.pm 2004/04/01 15:12:27 1.152 +++ loncom/interface/lonparmset.pm 2004/04/12 20:03:31 1.153 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.152 2004/04/01 15:12:27 albertel Exp $ +# $Id: lonparmset.pm,v 1.153 2004/04/12 20:03:31 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1499,7 +1499,7 @@ sub crsenv { } # # Let the user know we made the changes - if ($name) { + if ($name && defined($value)) { my $put_result = &Apache::lonnet::put('environment', {$name=>$value},$dom,$crs); if ($put_result eq 'ok') { @@ -1776,7 +1776,7 @@ ENDOVER push (@deldata,$thiskey); } elsif ($cmd eq 'datepointer') { my $data=&Apache::lonhtmlcommon::get_date_from_form($ENV{$_}); - if ($olddata{$thiskey} ne $data) { $newdata{$thiskey}=$data; } + if (defined($data) and $olddata{$thiskey} ne $data) { $newdata{$thiskey}=$data; } } } }