--- loncom/xml/lontexconvert.pm 2003/03/31 16:34:08 1.21
+++ loncom/xml/lontexconvert.pm 2003/04/19 20:32:24 1.22
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# TeX Conversion Module
#
-# $Id: lontexconvert.pm,v 1.21 2003/03/31 16:34:08 www Exp $
+# $Id: lontexconvert.pm,v 1.22 2003/04/19 20:32:24 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -127,7 +127,8 @@ sub footer {
sub to_convert {
my ($string) = @_;
- $string=~s/\
/ /g;
+ $string=~s/\
/ /gs;
+ $string=~s/\s/ /gs;
$string=&HTML::Entities::decode($string);
return &converted(\$string);
}
@@ -174,10 +175,10 @@ sub msgtexconverted {
&tth::tthoptions('-L -u0');
}
}
- $message=~s/(\$\$.+?\$\$)/&to_convert($1)/ge;
- $message=~s/(\$.+?\$)/&to_convert($1)/ge;
- $message=~s/(\\\(.+?\\\))/&to_convert($1)/ge;
- $message=~s/(\\\[.+?\\\])/&to_convert($1)/ge;
+ $message=~s/(\$\$.+?\$\$)/&to_convert($1)/gse;
+ $message=~s/(\$.+?\$)/&to_convert($1)/gse;
+ $message=~s/(\\\(.+?\\\))/&to_convert($1)/gse;
+ $message=~s/(\\\[.+?\\\])/&to_convert($1)/gse;
return &smiley($message).$errorstring;
}