--- rat/lonratsrv.pm 2001/07/04 19:59:24 1.14 +++ rat/lonratsrv.pm 2001/07/05 13:12:42 1.15 @@ -8,7 +8,7 @@ # 7/1 Gerd Kortemeyer) # 7/1,7/3,7/4,7/7,7/8,7/10,7/26,10/2 Gerd Kortemeyer # 4/30/2001 Scott Harrison -# 5/3,06/25,07/03,07/04 Gerd Kortemeyer +# 5/3,06/25,07/03,07/04,07/05 Gerd Kortemeyer package Apache::lonratsrv; @@ -25,7 +25,7 @@ sub qtescape { $str=~s/\&\#58\;/\:/g; $str=~s/\&\#39\;/\'/g; $str=~s/\&\#44\;/\,/g; - $str=~s/\&\#34\;/\"/g; + $str=~s/\"/\&\#34\;/g; return $str; }