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

matthew lon-capa-cvs@mail.lon-capa.org
Fri, 30 Apr 2004 21:28:08 -0000


matthew		Fri Apr 30 17:28:08 2004 EDT

  Modified files:              
    /loncom/interface	lonsearchcat.pm 
  Log:
  Fix to make the 'revise search' button work for advanced searches again.
  
  
Index: loncom/interface/lonsearchcat.pm
diff -u loncom/interface/lonsearchcat.pm:1.218 loncom/interface/lonsearchcat.pm:1.219
--- loncom/interface/lonsearchcat.pm:1.218	Tue Apr 27 11:45:04 2004
+++ loncom/interface/lonsearchcat.pm	Fri Apr 30 17:28:07 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Search Catalog
 #
-# $Id: lonsearchcat.pm,v 1.218 2004/04/27 15:45:04 matthew Exp $
+# $Id: lonsearchcat.pm,v 1.219 2004/04/30 21:28:07 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -286,7 +286,7 @@
     $ENV{'form.phase'} = 'disp_basic' if (! exists($ENV{'form.phase'}));
     $ENV{'form.show'} = 20 if (! exists($ENV{'form.show'}));
     #
-    $ENV{'form.searchmode'} = 'basic';
+    $ENV{'form.searchmode'} = 'basic' if (! exists($ENV{'form.searchmode'}));
     if ($ENV{'form.phase'} eq 'adv_search' ||
         $ENV{'form.phase'} eq 'disp_adv') {
         $ENV{'form.searchmode'} = 'advanced';