[LON-CAPA-cvs] cvs: loncom /homework lonhomework.pm

albertel lon-capa-cvs@mail.lon-capa.org
Mon, 23 Sep 2002 17:29:38 -0000


albertel		Mon Sep 23 13:29:38 2002 EDT

  Modified files:              
    /loncom/homework	lonhomework.pm 
  Log:
  - more intelligent defaults
  
  
Index: loncom/homework/lonhomework.pm
diff -u loncom/homework/lonhomework.pm:1.88 loncom/homework/lonhomework.pm:1.89
--- loncom/homework/lonhomework.pm:1.88	Mon Sep 16 16:39:39 2002
+++ loncom/homework/lonhomework.pm	Mon Sep 23 13:29:37 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Homework handler
 #
-# $Id: lonhomework.pm,v 1.88 2002/09/16 20:39:39 albertel Exp $
+# $Id: lonhomework.pm,v 1.89 2002/09/23 17:29:37 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -335,6 +335,8 @@
     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.='<html><body bgcolor="#FFFFFF">
             <form name="lonhomework" method="POST" action="'.
 	      $ENV{'request.uri'}.'">