--- loncom/interface/lonsimplepage.pm 2009/02/25 13:25:52 1.72 +++ loncom/interface/lonsimplepage.pm 2009/03/27 15:46:38 1.77 @@ -1,7 +1,7 @@ # The LearningOnline Network # Simple Page Editor # -# $Id: lonsimplepage.pm,v 1.72 2009/02/25 13:25:52 neumanie Exp $ +# $Id: lonsimplepage.pm,v 1.77 2009/03/27 15:46:38 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -253,29 +253,37 @@ sub handler { &Apache::lonnet::put($db_name,\%syllabus,$dom,$crs); } +#---Print help Text +if($target ne 'tex'){ + if($allowed){ + $r->print(&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes',&mt('Help with filling in text boxes'))); + } +} #---Print Function if ($target ne 'tex') { if($allowed || $privileged){ - &Apache::lontemplate::print_start_page_functions($r); + $r->print(&Apache::lontemplate::start_functionslist()); if($allowed){ - &Apache::lontemplate::print_functions_content($r,''.&mt('Show Student View').''.&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView')); - &Apache::lontemplate::print_functions_content($r,&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes',&mt('Help with filling in text boxes'))); + $r->print(&Apache::lontemplate::item_functionslist( + ''.&mt('Show Student View').'' + .&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView'))); }elsif($privileged){ my $edittext = &mt('Edit'); if ($group ne '') { $edittext = &mt('Edit Group Homepage'); } - &Apache::lontemplate::print_functions_content($r,''.$edittext.''); + $r->print(&Apache::lontemplate::item_functionslist( + ''.$edittext.'')); if ($group ne '') { if ($group_edit_perm) { - &Apache::lontemplate::print_functions_content($r,' '. - ''. - &mt('Edit Group Settings').''); + $r->print(&Apache::lontemplate::item_functionslist( + '' + .&mt('Edit Group Settings').'')); } - } + } } - &Apache::lontemplate::print_end_page_functions($r); + $r->print(&Apache::lontemplate::end_functionslist()); } } @@ -334,9 +342,7 @@ sub handler { if($allowed){ $r->print('
'); } - $r->print('
'); + $r->print(''); - $r->print(''.$message.'
'); } else { my $safeinit; $r->print(&Apache::lonxml::xmlparse($r,'tex',''.$message.'
')); @@ -387,9 +393,6 @@ sub handler { $r->print(''.&mt('No page information provided.').'
'); } } - - $r->print('