|
version 1.428, 2006/11/30 01:07:09
|
version 1.430, 2006/12/11 00:42:47
|
|
Line 780 sub init_safespace {
|
Line 780 sub init_safespace {
|
| $safehole->wrap(\&Apache::lonnet::logthis,$safeeval,'&LONCAPA_INTERNAL_LOGTHIS'); |
$safehole->wrap(\&Apache::lonnet::logthis,$safeeval,'&LONCAPA_INTERNAL_LOGTHIS'); |
| $safehole->wrap(\&Apache::inputtags::finalizeawards,$safeeval,'&LONCAPA_INTERNAL_FINALIZEAWARDS'); |
$safehole->wrap(\&Apache::inputtags::finalizeawards,$safeeval,'&LONCAPA_INTERNAL_FINALIZEAWARDS'); |
| $safehole->wrap(\&Apache::caparesponse::get_sigrange,$safeeval,'&LONCAPA_INTERNAL_get_sigrange'); |
$safehole->wrap(\&Apache::caparesponse::get_sigrange,$safeeval,'&LONCAPA_INTERNAL_get_sigrange'); |
| use Data::Dumper; |
# use Data::Dumper; |
| $safehole->wrap(\&Data::Dumper::Dumper,$safeeval,'&LONCAPA_INTERNAL_Dumper'); |
# $safehole->wrap(\&Data::Dumper::Dumper,$safeeval,'&LONCAPA_INTERNAL_Dumper'); |
| #need to inspect this class of ops |
#need to inspect this class of ops |
| # $safeeval->deny(":base_orig"); |
# $safeeval->deny(":base_orig"); |
| $safeeval->permit("require"); |
$safeeval->permit("require"); |
|
Line 1422 sub handler {
|
Line 1422 sub handler {
|
| # |
# |
| if (!($env{'request.state'} eq 'published')) { |
if (!($env{'request.state'} eq 'published')) { |
| if ($env{'form.savethisfile'} || $env{'form.viewmode'} || $env{'form.Undo'}) { |
if ($env{'form.savethisfile'} || $env{'form.viewmode'} || $env{'form.Undo'}) { |
| my $problem=&Apache::lonnet::getfile($file); |
my $html_file=&Apache::lonnet::getfile($file); |
| my $error = &Apache::lonhomework::handle_save_or_undo($request, \$problem, \$env{'form.filecont'}); |
my $error = &Apache::lonhomework::handle_save_or_undo($request, \$html_file, \$env{'form.filecont'}); |
| } |
} |
| } |
} |
| my %mystyle; |
my %mystyle; |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonxml.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / xml