--- loncom/interface/lonsyllabus.pm 2009/06/11 16:48:33 1.93
+++ loncom/interface/lonsyllabus.pm 2009/10/23 16:14:43 1.100
@@ -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.100 2009/10/23 16:14:43 bisitz 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'},});
@@ -151,7 +151,7 @@ ENDSCRIPT
&Apache::lonhtmlcommon::clear_breadcrumbs();
&Apache::lonhtmlcommon::add_breadcrumb
({href=>"javascript:ToCatalog()",
- text=>"Course Catalog"});
+ text=>"Course/Community Catalog"});
if ($env{'form.coursenum'} ne '') {
&Apache::lonhtmlcommon::add_breadcrumb
({href=>"javascript:ToCatalog('details')",
@@ -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('