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

[www]

www		Fri May  7 13:53:02 2004 EDT

  Modified files:              
    /loncom/interface	lonpickcourse.pm 
  Log:
  Bug #2734: do not trash special characters in Course Description
  
  
Index: loncom/interface/lonpickcourse.pm
diff -u loncom/interface/lonpickcourse.pm:1.14 loncom/interface/lonpickcourse.pm:1.15
--- loncom/interface/lonpickcourse.pm:1.14	Wed Mar 31 00:24:00 2004
+++ loncom/interface/lonpickcourse.pm	Fri May  7 13:53:01 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Pick a course
 #
-# $Id: lonpickcourse.pm,v 1.14 2004/03/31 05:24:00 albertel Exp $
+# $Id: lonpickcourse.pm,v 1.15 2004/05/07 17:53:01 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -61,9 +61,9 @@
                                                           'domainfilter',1);
 # description filter
     my $descriptfilter=$ENV{'form.descriptfilter'};
-    $descriptfilter=~s/[^\w\s]//g;
     unless ($descriptfilter) { $descriptfilter=''; }
-
+    my $listdescript=$descriptfilter;
+    $listdescript=~s/\"/\&quot\;/g;
 # last course activity filter and selection
     my $sincefilter=$ENV{'form.sincefilter'};
     $sincefilter=~s/[^\d-]//g;
@@ -115,7 +115,7 @@
 $lt{'cdo'}: $domainselectform
 <br />
 $lt{'cde'}:
-<input type="text" name="descriptfilter" size="40" value="$descriptfilter" />
+<input type="text" name="descriptfilter" size="40" value="$listdescript" />
 <p><input type="submit" name="gosearch" value="Search" /></p>
 </form>
 <hr />