Diff for /loncom/interface/Attic/lonspreadsheet.pm between versions 1.160.2.3 and 1.160.2.4

version 1.160.2.3, 2003/03/14 22:54:26 version 1.160.2.4, 2003/03/19 17:16:23
Line 833  sub expandnamed { Line 833  sub expandnamed {
             push @matches,$parameter if ($parameter =~ /$expression/);              push @matches,$parameter if ($parameter =~ /$expression/);
         }          }
         if (scalar(@matches) == 0) {          if (scalar(@matches) == 0) {
             $returnvalue = 'unmatched parameter: '.$parameter;              $returnvalue = undef; #'unmatched parameter: '.$parameter;
         } elsif (scalar(@matches) == 1) {          } elsif (scalar(@matches) == 1) {
             $returnvalue = '$c{\''.$matches[0].'\'}';              $returnvalue = '$c{\''.$matches[0].'\'}';
         } elsif (scalar(@matches) > 0) {          } elsif (scalar(@matches) > 0) {
Line 3035  sub handler { Line 3035  sub handler {
                                              $ENV{'form.ufn'} eq 'default')) {                                               $ENV{'form.ufn'} eq 'default')) {
         $ENV{'form.ufn'}='default_'.$1;          $ENV{'form.ufn'}='default_'.$1;
     }      }
     if (!$ENV{'form.ufn'} || $ENV{'form.ufn'} eq 'default') {  #    if (!$ENV{'form.ufn'} || $ENV{'form.ufn'} eq 'default') {
         $ENV{'form.ufn'}='course_default_'.$sheettype;  #        $ENV{'form.ufn'}='course_default_'.$sheettype;
     }  #    }
     #      #
     # Interactive loading of specific sheet?      # Interactive loading of specific sheet?
     #      #

Removed from v.1.160.2.3  
changed lines
  Added in v.1.160.2.4


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>