[LON-CAPA-cvs] cvs: loncom(fixes_0_5) /interface lonspreadsheet.pm

[matthew]

matthew		Fri Sep 27 16:41:26 2002 EDT

  Modified files:              (Branch: fixes_0_5)
    /loncom/interface	lonspreadsheet.pm 
  Log:
  Backport of fix for 0 bug.
  
  
Index: loncom/interface/lonspreadsheet.pm
diff -u loncom/interface/lonspreadsheet.pm:1.100.4.1 loncom/interface/lonspreadsheet.pm:1.100.4.2
--- loncom/interface/lonspreadsheet.pm:1.100.4.1	Fri Sep 27 14:43:10 2002
+++ loncom/interface/lonspreadsheet.pm	Fri Sep 27 16:41:25 2002
@@ -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 @@
 
 # Deal with the normal cells
     foreach (keys(%f)) {
-	if (($f{$_}) && ($_!~/template\_/)) {
+	if (exists($f{$_}) && ($_!~/template\_/)) {
             my $matches=($_=~/^$pattern(\d+)/);
             if  (($matches) && ($1)) {
 	        unless ($f{$_}=~/^\!/) {