--- loncom/homework/lonhomework.pm 2002/09/07 18:21:44 1.87 +++ loncom/homework/lonhomework.pm 2002/09/23 17:29:37 1.89 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Homework handler # -# $Id: lonhomework.pm,v 1.87 2002/09/07 18:21:44 www Exp $ +# $Id: lonhomework.pm,v 1.89 2002/09/23 17:29:37 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -79,7 +79,8 @@ sub get_target { return ('web'); } } else { - if ( $ENV{'form.problemmode'} eq 'View' ) { + if ( $ENV{'form.problemmode'} eq 'View' || + $ENV{'form.problemmode'} eq 'Discard Edits and View') { if ( defined($ENV{'form.submitted'}) && (!defined($ENV{'form.resetdata'})) ) { return ('grade', 'web','answer'); @@ -334,6 +335,8 @@ sub editxmlmode { my ($rows,$cols) = &Apache::edit::textarea_sizes(\$problem); my $xml_help = Apache::loncommon::help_open_topic("Problem_Editor_XML_Index"); if ($cols > 80) { $cols = 80; } + if ($cols < 70) { $cols = 70; } + if ($rows < 20) { $rows = 20; } $result.='