--- loncom/interface/Attic/lonspreadsheet.pm	2002/09/27 18:43:10	1.100.4.1
+++ loncom/interface/Attic/lonspreadsheet.pm	2002/09/27 20:41:25	1.100.4.2
@@ -1,5 +1,5 @@
 #
-# $Id: lonspreadsheet.pm,v 1.100.4.1 2002/09/27 18:43:10 matthew Exp $
+# $Id: lonspreadsheet.pm,v 1.100.4.2 2002/09/27 20:41:25 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -822,7 +822,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{$_}=~/^\!/) {