[LON-CAPA-cvs] cvs: loncom /interface/spreadsheet Spreadsheet.pm

[matthew]

matthew		Tue Sep 16 11:36:32 2003 EDT

  Modified files:              
    /loncom/interface/spreadsheet	Spreadsheet.pm 
  Log:
  More sanity checking in &mask.
  
  
Index: loncom/interface/spreadsheet/Spreadsheet.pm
diff -u loncom/interface/spreadsheet/Spreadsheet.pm:1.26 loncom/interface/spreadsheet/Spreadsheet.pm:1.27
--- loncom/interface/spreadsheet/Spreadsheet.pm:1.26	Mon Sep 15 16:31:01 2003
+++ loncom/interface/spreadsheet/Spreadsheet.pm	Tue Sep 16 11:36:32 2003
@@ -1,5 +1,5 @@
 #
-# $Id: Spreadsheet.pm,v 1.26 2003/09/15 20:31:01 matthew Exp $
+# $Id: Spreadsheet.pm,v 1.27 2003/09/16 15:36:32 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -749,6 +749,11 @@
     if (($la eq '*') || ($ua eq '*')) {
         $alpha='[A-z]';
     } else {
+        if ($la gt $ua) {
+            my $tmp = $ua;
+            $ua = $la;
+            $la = $ua;
+        }
         $alpha=qq/[$la-$ua]/;
     }
     if ($ld ne '*' && $ud ne '*') {