Return to Spreadsheet.pm CVS log | Up to [LON-CAPA] / loncom / interface / spreadsheet |
version 1.26, 2003/09/15 20:31:01 | version 1.27, 2003/09/16 15:36:32 |
---|---|
Line 749 sub mask { | Line 749 sub mask { |
if (($la eq '*') || ($ua eq '*')) { | if (($la eq '*') || ($ua eq '*')) { |
$alpha='[A-z]'; | $alpha='[A-z]'; |
} else { | } else { |
if ($la gt $ua) { | |
my $tmp = $ua; | |
$ua = $la; | |
$la = $ua; | |
} | |
$alpha=qq/[$la-$ua]/; | $alpha=qq/[$la-$ua]/; |
} | } |
if ($ld ne '*' && $ud ne '*') { | if ($ld ne '*' && $ud ne '*') { |