--- loncom/homework/grades.pm 2003/12/02 04:50:26 1.165 +++ loncom/homework/grades.pm 2003/12/04 23:23:16 1.166 @@ -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 @@ sub cleanRecord { $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 '

'.&keywords_highlight($answer).'
'; + $answer =~ s-\n-
-g; + return '

'.&keywords_highlight($answer).'
'; } return $answer; }