[LON-CAPA-cvs] cvs: loncom /homework grades.pm

albertel lon-capa-cvs@mail.lon-capa.org
Thu, 04 Dec 2003 23:23:17 -0000


albertel		Thu Dec  4 18:23:17 2003 EDT

  Modified files:              
    /loncom/homework	grades.pm 
  Log:
  - Fixes BUG#2423 which was caused by the fix to BUG#2253, now preserves student returns and line wraps things correctly on the screen.
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.165 loncom/homework/grades.pm:1.166
--- loncom/homework/grades.pm:1.165	Mon Dec  1 23:50:26 2003
+++ loncom/homework/grades.pm	Thu Dec  4 18:23:16 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.165 2003/12/02 04:50:26 albertel Exp $
+# $Id: grades.pm,v 1.166 2003/12/04 23:23:16 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -290,7 +290,8 @@
 	    $ENV{'form.kwstyle'}  = $keyhash{$loginuser.'_kwstyle'} ne '' ? $keyhash{$loginuser.'_kwstyle'} : '';
 	    $ENV{'form.'.$symb} = 1; # so that we don't have to read it from disk for multiple sub of the same prob.
 	}
-	return '<br /><br /><blockquote><pre>'.&keywords_highlight($answer).'</pre></blockquote>';
+	$answer =~ s-\n-<br />-g;
+	return '<br /><br /><blockquote><tt>'.&keywords_highlight($answer).'</tt></blockquote>';
     }
     return $answer;
 }