loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.302, 2009/02/17 15:25:18	version 1.304, 2009/03/04 16:00:14
Line 871 sub editxmlmode {	Line 871 sub editxmlmode {
&renderpage($request,$file);	&renderpage($request,$file);
} else {	} else {
my ($rows,$cols) = &Apache::edit::textarea_sizes(\$problem);	my ($rows,$cols) = &Apache::edit::textarea_sizes(\$problem);
my $xml_help = '<table><tr><td>'.
&Apache::loncommon::helpLatexCheatsheet("Problem_Editor_XML_Index",
"Problem Editing Help").
'</td><td>'.
&Apache::loncommon::help_open_menu(undef,undef,5,'Authoring').
'</td></tr></table>';
if ($cols > 80) { $cols = 80; }	if ($cols > 80) { $cols = 80; }
if ($cols < 70) { $cols = 70; }	if ($cols < 70) { $cols = 70; }
if ($rows < 20) { $rows = 20; }	if ($rows < 20) { $rows = 20; }
Line 1140 sub update_construct_style {	Line 1134 sub update_construct_style {
&& !defined($env{'form.newrandomization'})) {	&& !defined($env{'form.newrandomization'})) {
if ((!$env{'form.style_file'} && $env{'construct.style'})	if ((!$env{'form.style_file'} && $env{'construct.style'})
\|\|$env{'form.clear_style_file'}) {	\|\|$env{'form.clear_style_file'}) {
&Apache::lonnet::delenv('construct\\.style');	&Apache::lonnet::delenv('construct.style');
} elsif ($env{'form.style_file'}	} elsif ($env{'form.style_file'}
&& $env{'construct.style'} ne $env{'form.style_file'}) {	&& $env{'construct.style'} ne $env{'form.style_file'}) {
&Apache::lonnet::appenv({'construct.style' =>	&Apache::lonnet::appenv({'construct.style' =>