--- loncom/interface/lonsimplepage.pm 2009/02/13 17:26:56 1.65 +++ loncom/interface/lonsimplepage.pm 2009/02/23 22:36:30 1.70 @@ -1,7 +1,7 @@ # The LearningOnline Network # Simple Page Editor # -# $Id: lonsimplepage.pm,v 1.65 2009/02/13 17:26:56 neumanie Exp $ +# $Id: lonsimplepage.pm,v 1.70 2009/02/23 22:36:30 schualex Exp $ # # Copyright Michigan State University Board of Trustees # @@ -139,9 +139,9 @@ sub handler { # --------------------------------------- There is such a user, get environment if ($target ne 'tex') { - my $title = 'Course Page'; + my $title = 'Simple Course Page'; if ($group ne '') { - $title = 'Group Page'; + $title = 'Simple Group Page'; } my $start_page = &Apache::loncommon::start_page($title,undef, @@ -216,25 +216,7 @@ sub handler { if ($forcestudent or $target eq 'tex') { $allowed=0; } if ($allowed) { - $r->print('
'.'
'
- .''.&mt('Show Student View').''.
- &Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView').
- &Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes',&mt('Help with filling in text boxes'))
- .'
'.&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes',&mt('Help with filling in text boxes')) .'
'); } if (($env{'form.uploaddoc.filename'} and $target ne 'tex') && ($env{'form.storeupl'}) && ($allowed)) { @@ -289,6 +271,30 @@ sub handler { $image=&Apache::lonxml::xmlparse($r,'tex',$image); } } + if ($target ne 'tex') { + if($allowed || $privileged){ + &Apache::lontemplate::print_start_page_functions($r); + if($allowed){ + &Apache::lontemplate::print_functions_content($r,''.&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.''); + if ($group ne '') { + if ($group_edit_perm) { + &Apache::lontemplate::print_functions_content($r,' '. + ''. + &mt('Edit Group Settings').''); + } + } + } + &Apache::lontemplate::print_end_page_functions($r); + } + } if ($allowed) { $r->print( '