![[BACK]](/icons/back.gif){kind=icon}
Return to lonspreadsheet.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to lonspreadsheet.pm CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.111, 2002/09/27 18:29:15 | version 1.112, 2002/09/27 20:40:19 |
|---|---|
| Line 852 sub sett { | Line 852 sub sett { |
| } | } |
| # Deal with the normal cells | # Deal with the normal cells |
| foreach (keys(%f)) { | foreach (keys(%f)) { |
| if (($f{$_}) && ($_!~/template\_/)) { | if (exists($f{$_}) && ($_!~/template\_/)) { |
| my $matches=($_=~/^$pattern(\d+)/); | my $matches=($_=~/^$pattern(\d+)/); |
| if (($matches) && ($1)) { | if (($matches) && ($1)) { |
| unless ($f{$_}=~/^\!/) { | unless ($f{$_}=~/^\!/) { |