--- loncom/interface/Attic/lonspreadsheet.pm 2002/09/27 18:29:15 1.111 +++ loncom/interface/Attic/lonspreadsheet.pm 2002/09/27 20:40:19 1.112 @@ -1,5 +1,5 @@ # -# $Id: lonspreadsheet.pm,v 1.111 2002/09/27 18:29:15 matthew Exp $ +# $Id: lonspreadsheet.pm,v 1.112 2002/09/27 20:40:19 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -852,7 +852,7 @@ sub sett { } # Deal with the normal cells foreach (keys(%f)) { - if (($f{$_}) && ($_!~/template\_/)) { + if (exists($f{$_}) && ($_!~/template\_/)) { my $matches=($_=~/^$pattern(\d+)/); if (($matches) && ($1)) { unless ($f{$_}=~/^\!/) {