--- loncom/xml/lonxml.pm 2003/10/04 20:49:40 1.284 +++ loncom/xml/lonxml.pm 2003/10/29 18:29:24 1.289 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # XML Parser Module # -# $Id: lonxml.pm,v 1.284 2003/10/04 20:49:40 www Exp $ +# $Id: lonxml.pm,v 1.289 2003/10/29 18:29:24 sakharuk Exp $ # # Copyright Michigan State University Board of Trustees # @@ -96,6 +96,7 @@ use Apache::style(); use Apache::run(); use Apache::londefdef(); use Apache::scripttag(); +use Apache::languagetags(); use Apache::edit(); use Apache::inputtags(); use Apache::outputtags(); @@ -319,6 +320,7 @@ sub xmlparse { &Apache::inputtags::initialize_inputtags(); &Apache::outputtags::initialize_outputtags(); &Apache::edit::initialize_edit(); + &Apache::londefdef::initialize_londefdef(); # # do we have a course style file? @@ -393,7 +395,7 @@ sub latex_special_symbols { $string =~ s/_/ /g; } else { $string=~s/\\ /\\char92 /g; - $string=~s/\^/\\char94 /g; + $string=~s/\^/\\\^ /g; $string=~s/\~/\\char126 /g; $string=~s/(&[^A-Za-z\#])/\\$1/g; $string=~s/([^&])\#/$1\\#/g; @@ -657,6 +659,7 @@ sub init_safespace { $safeeval->permit("entereval"); $safeeval->permit(":base_math"); $safeeval->permit("sort"); + $safeeval->permit("time"); $safeeval->deny(":base_io"); $safehole->wrap(\&Apache::scripttag::xmlparse,$safeeval,'&xmlparse'); $safehole->wrap(\&Apache::outputtags::multipart,$safeeval,'&multipart');