[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /interface lontemplate.pm

raeburn raeburn at source.lon-capa.org
Tue Dec 18 10:53:07 EST 2012


raeburn		Tue Dec 18 15:53:07 2012 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/interface	lontemplate.pm 
  Log:
  - For 2.11
    - Backport 1.46.
  
  
Index: loncom/interface/lontemplate.pm
diff -u loncom/interface/lontemplate.pm:1.45.6.2 loncom/interface/lontemplate.pm:1.45.6.3
--- loncom/interface/lontemplate.pm:1.45.6.2	Tue May 15 22:52:56 2012
+++ loncom/interface/lontemplate.pm	Tue Dec 18 15:53:07 2012
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # "Template" Functions to generate html output
 #
-# $Id: lontemplate.pm,v 1.45.6.2 2012/05/15 22:52:56 raeburn Exp $
+# $Id: lontemplate.pm,v 1.45.6.3 2012/12/18 15:53:07 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -127,9 +127,9 @@
 sub print_editbox_template {
 	my ($r,$content,$field) = @_;
 	$r->print('<textarea cols="81" rows="6" name="'.$field.'">'.
-                           &HTML::Entities::encode($content,'"&<>').
-           '</textarea><br /><input type="submit" name="storesyl" value="'.
-                           &mt('Save All').'" />');
+                  &HTML::Entities::encode($content,'"&<>').
+                  '</textarea><br />'."\n");
+	&print_saveall_template($r);
 }
 
 sub print_textarea_template {
@@ -175,7 +175,7 @@
 						$r->print("<br /><div>");
 						&Apache::lontemplate::print_textarea_template($r, $data{$field},
 							$field, $default_rich_text);
-						&Apache::lontemplate::print_saveall_template($r);
+						&print_saveall_template($r);
 						$r->print("</div>");
 					} 
 					&Apache::lontemplate::print_end_template($r);




More information about the LON-CAPA-cvs mailing list