version 1.44, 2010/04/27 02:44:57
|
version 1.46, 2012/12/18 15:46:34
|
Line 128 sub print_end_template {
|
Line 128 sub print_end_template {
|
sub print_editbox_template { |
sub print_editbox_template { |
my ($r,$content,$field) = @_; |
my ($r,$content,$field) = @_; |
$r->print('<textarea cols="81" rows="6" name="'.$field.'">'. |
$r->print('<textarea cols="81" rows="6" name="'.$field.'">'. |
&HTML::Entities::encode($content,'"&<>'). |
&HTML::Entities::encode($content,'"&<>'). |
'</textarea><br /><input type="submit" name="storesyl" value="'. |
'</textarea><br />'."\n"); |
&mt('Save All').'" />'); |
&print_saveall_template($r); |
} |
} |
|
|
sub print_textarea_template { |
sub print_textarea_template { |
Line 170 sub print_template_fields {
|
Line 170 sub print_template_fields {
|
$r->print("<br /><div>"); |
$r->print("<br /><div>"); |
&Apache::lontemplate::print_textarea_template($r, $data{$field}, |
&Apache::lontemplate::print_textarea_template($r, $data{$field}, |
$field, $default_rich_text); |
$field, $default_rich_text); |
&Apache::lontemplate::print_saveall_template($r); |
&print_saveall_template($r); |
$r->print("</div>"); |
$r->print("</div>"); |
} |
} |
&Apache::lontemplate::print_end_template($r); |
&Apache::lontemplate::print_end_template($r); |
} else { |
} else { |
my $safeinit; |
my $safeinit; |
$r->print(&Apache::lonxml::xmlparse($r,'tex','<h3>'.$fields{$field}.'</h3>')); |
if ($fields{$field}=~/\w/) { |
$r->print(&Apache::lonxml::xmlparse($r,'tex',$message)); |
$r->print(&Apache::lonxml::xmlparse($r,'tex','<h3>'.$fields{$field}.'</h3>')); |
|
} else { |
|
$r->print(&Apache::lonxml::xmlparse($r,'tex','<br />')); |
|
} |
|
$r->print(&Apache::lonxml::xmlparse($r,'tex',$message)); |
} |
} |
push(@html_ids,$field); |
push(@html_ids,$field); |
} |
} |