version 1.508, 2010/05/03 14:43:07
|
version 1.511, 2010/07/26 09:58:53
|
Line 476 sub inner_xmlparse {
|
Line 476 sub inner_xmlparse {
|
} |
} |
if (($ENV{'QUERY_STRING'}) && ($target eq 'web')) { |
if (($ENV{'QUERY_STRING'}) && ($target eq 'web')) { |
$finaloutput=&afterburn($finaloutput); |
$finaloutput=&afterburn($finaloutput); |
|
} |
|
if ($target eq 'modified') { |
|
# if modfied, handle startpart and endpart |
|
$finaloutput=~s/\<startpartmarker[^\>]*\>(.*)\<endpartmarker[^\>]*\>/<part>$1<\/part>/gs; |
} |
} |
return $finaloutput; |
return $finaloutput; |
} |
} |
Line 638 sub setup_globals {
|
Line 642 sub setup_globals {
|
|
|
sub init_safespace { |
sub init_safespace { |
my ($target,$safeeval,$safehole,$safeinit) = @_; |
my ($target,$safeeval,$safehole,$safeinit) = @_; |
$safeeval->deny_only(':dangerous'); |
|
$safeeval->reval('use Math::Complex;'); |
$safeeval->reval('use Math::Complex;'); |
|
$safeeval->reval('use LaTeX::Table;'); |
|
$safeeval->deny_only(':dangerous'); |
$safeeval->permit_only(":default"); |
$safeeval->permit_only(":default"); |
$safeeval->permit("entereval"); |
$safeeval->permit("entereval"); |
$safeeval->permit(":base_math"); |
$safeeval->permit(":base_math"); |
Line 1460 sub renderingoptions {
|
Line 1465 sub renderingoptions {
|
&Apache::loncommon::select_form( |
&Apache::loncommon::select_form( |
$env{'form.languages'}, |
$env{'form.languages'}, |
'languages', |
'languages', |
&Apache::lonlocal::texthash(%langchoices)). |
{&Apache::lonlocal::texthash(%langchoices)}). |
'</span>'; |
'</span>'; |
} |
} |
$output .= |
$output .= |
Line 1469 sub renderingoptions {
|
Line 1474 sub renderingoptions {
|
&Apache::loncommon::select_form( |
&Apache::loncommon::select_form( |
$env{'form.texengine'}, |
$env{'form.texengine'}, |
'texengine', |
'texengine', |
&Apache::lonlocal::texthash |
{&Apache::lonlocal::texthash |
('' => '', |
('' => '', |
'tth' => 'tth (TeX to HTML)', |
'tth' => 'tth (TeX to HTML)', |
'jsMath' => 'jsMath', |
'jsMath' => 'jsMath', |
'mimetex' => 'mimetex (Convert to Images)')). |
'mimetex' => 'mimetex (Convert to Images)')}). |
'</span>'; |
'</span>'; |
return $output; |
return $output; |
} |
} |