--- loncom/interface/lonsyllabus.pm 2009/06/11 16:48:33 1.93 +++ loncom/interface/lonsyllabus.pm 2009/09/27 11:05:06 1.99 @@ -1,7 +1,7 @@ # The LearningOnline Network # Syllabus # -# $Id: lonsyllabus.pm,v 1.93 2009/06/11 16:48:33 bisitz Exp $ +# $Id: lonsyllabus.pm,v 1.99 2009/09/27 11:05:06 amueller Exp $ # # Copyright Michigan State University Board of Trustees # @@ -141,7 +141,7 @@ ENDSCRIPT } my $start_page = &Apache::loncommon::start_page("Syllabus", $rss_link.$js, - {'function' => $forcestudent, + {'function' => undef, 'domain' => $cdom, 'force_register' => $env{'form.register'},}); @@ -182,6 +182,7 @@ ENDSCRIPT } if ($forcestudent or $target eq 'tex') { $allowed=0; } } + #store what the user typed in if (($allowed) && ($env{'form.storesyl'})) { foreach my $syl_field (keys(%syllabusfields)) { my $field=$env{'form.'.$syl_field}; @@ -190,6 +191,7 @@ ENDSCRIPT $field=~s/^\s+//s; $field=~s/\$//s; $field=&Apache::lonfeedback::clear_out_html($field,1); + #here it will be stored $syllabus{$syl_field}=$field; if ($syl_field eq 'lll_includeurl') { # clean up included URLs my $field=''; @@ -230,24 +232,40 @@ ENDSCRIPT } #--------Functions -if( $allowed || $privileged) { - my $functions=&Apache::lonhtmlcommon::start_funclist(); - if ($allowed) { - $functions.=&Apache::lonhtmlcommon::add_item_funclist( - '' - .&mt('Show Public View').'' - .&Apache::loncommon::help_open_topic( - 'Uploaded_Templates_PublicView')); + if( ($allowed || $privileged) && $target ne 'tex') { + my $functions=&Apache::lonhtmlcommon::start_funclist(); + if ($allowed) { + #if you have the register flag, keep it + if($env{'form.register'} == 1) { + $functions.=&Apache::lonhtmlcommon::add_item_funclist( + '' + .&mt('Show Public View').'' + .&Apache::loncommon::help_open_topic( + 'Uploaded_Templates_PublicView')); + } else { + $functions.=&Apache::lonhtmlcommon::add_item_funclist( + '' + .&mt('Show Public View').'' + .&Apache::loncommon::help_open_topic( + 'Uploaded_Templates_PublicView')); + } } elsif ($privileged) { - $functions.=&Apache::lonhtmlcommon::add_item_funclist( - '' - .&mt('Edit').''); + if($env{'form.register'} == 1) { + $functions.=&Apache::lonhtmlcommon::add_item_funclist( + '' + .&mt('Edit').''); + } else { + $functions.=&Apache::lonhtmlcommon::add_item_funclist( + '' + .&mt('Edit').''); + } } + $functions.=&Apache::lonhtmlcommon::end_funclist(); $r->print(&Apache::loncommon::head_subbox($functions)); } -#---------------------Print External URL Syllabus Info +#---------------------Print External URL Syllabus Info and Help Text if( ($allowed) && ($target ne 'tex') ) { my $protocol = $Apache::lonnet::protocol{$homeserver}; $protocol = 'http' if ($protocol ne 'https'); @@ -257,18 +275,16 @@ if( $allowed || $privileged) { .' '.&Apache::loncommon::help_open_topic('Syllabus_ExtLink') .'

' .'

' - .&mt('Instead of using this template you can specify an external URL as Syllabus in the [_1]Course Parameters[_2].' - ,'','') + .&mt('Instead of using this template you can specify an external URL as Syllabus in the [_1]Course Configuration[_2].' + ,'','') .'

' ); + #-Print Help Text + $r->print(&Apache::loncommon::help_open_topic( + 'Uploaded_Templates_TextBoxes', + &mt('Help with filling in text boxes'))); } -#-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 last update my $lastmod=$syllabus{'uploaded.lastmodified'}; $lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never')); @@ -363,7 +379,7 @@ if( $allowed || $privileged) { # ---------------------------------------------------------------- Get syllabus if (($syllabus{'uploaded.lastmodified'}) || ($allowed)) { if ($allowed) { - $r->print('
'. + $r->print(''. ''); } my @htmlids=(); @@ -406,9 +422,7 @@ if( $allowed || $privileged) { } $message=&Apache::lontexconvert::msgtexconverted($message); if ($target ne 'tex') { - if ($allowed) { - $r->print('

'); - } + #output of syllabusfields will be generated here. &Apache::lontemplate::print_template($r, $syllabusfields{$field}, $message,$allowed,'LC_Box'); } else { $r->print('\\\\\textbf{'.$syllabusfields{$field}.'}\\\\'. @@ -418,7 +432,6 @@ if( $allowed || $privileged) { } if ($allowed) { if ($target ne 'tex') { - $r->print('

'); &Apache::lontemplate::print_editbox_template($r, $syllabus{$field}, $field); } }