[LON-CAPA-cvs] cvs: loncom /interface lontemplate.pm
raeburn
raeburn at source.lon-capa.org
Tue Dec 18 10:46:34 EST 2012
raeburn Tue Dec 18 15:46:34 2012 EDT
Modified files:
/loncom/interface lontemplate.pm
Log:
- Use &print_saveall_template().
Index: loncom/interface/lontemplate.pm
diff -u loncom/interface/lontemplate.pm:1.45 loncom/interface/lontemplate.pm:1.46
--- loncom/interface/lontemplate.pm:1.45 Tue May 3 21:38:40 2011
+++ loncom/interface/lontemplate.pm Tue Dec 18 15:46:34 2012
@@ -1,7 +1,7 @@
# The LearningOnline Network
# "Template" Functions to generate html output
#
-# $Id: lontemplate.pm,v 1.45 2011/05/03 21:38:40 www Exp $
+# $Id: lontemplate.pm,v 1.46 2012/12/18 15:46:34 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -128,9 +128,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 {
@@ -170,7 +170,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