version 1.93, 2009/06/11 16:48:33
|
version 1.94, 2009/09/02 12:39:26
|
Line 230 ENDSCRIPT
|
Line 230 ENDSCRIPT
|
} |
} |
|
|
#--------Functions |
#--------Functions |
if( $allowed || $privileged) { |
if( ($allowed || $privileged) && $target ne 'tex') { |
my $functions=&Apache::lonhtmlcommon::start_funclist(); |
my $functions=&Apache::lonhtmlcommon::start_funclist(); |
if ($allowed) { |
|
$functions.=&Apache::lonhtmlcommon::add_item_funclist( |
if ($allowed) { |
'<a href="'.$r->uri.'?forcestudent=1">' |
$functions.=&Apache::lonhtmlcommon::add_item_funclist( |
.&mt('Show Public View').'</a>' |
'<a href="'.$r->uri.'?forcestudent=1">' |
.&Apache::loncommon::help_open_topic( |
.&mt('Show Public View').'</a>' |
'Uploaded_Templates_PublicView')); |
.&Apache::loncommon::help_open_topic( |
|
'Uploaded_Templates_PublicView')); |
} elsif ($privileged) { |
} elsif ($privileged) { |
$functions.=&Apache::lonhtmlcommon::add_item_funclist( |
$functions.=&Apache::lonhtmlcommon::add_item_funclist( |
'<a href="'.$r->uri.'?forceedit=1">' |
'<a href="'.$r->uri.'?forceedit=1">' |
.&mt('Edit').'</a>'); |
.&mt('Edit').'</a>'); |
} |
} |
|
|
$functions.=&Apache::lonhtmlcommon::end_funclist(); |
$functions.=&Apache::lonhtmlcommon::end_funclist(); |
$r->print(&Apache::loncommon::head_subbox($functions)); |
$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') ) { |
if( ($allowed) && ($target ne 'tex') ) { |
my $protocol = $Apache::lonnet::protocol{$homeserver}; |
my $protocol = $Apache::lonnet::protocol{$homeserver}; |
$protocol = 'http' if ($protocol ne 'https'); |
$protocol = 'http' if ($protocol ne 'https'); |
Line 261 if( $allowed || $privileged) {
|
Line 263 if( $allowed || $privileged) {
|
,'<a href="/adm/parmset?action=crsenv">','</a>') |
,'<a href="/adm/parmset?action=crsenv">','</a>') |
.'</p>' |
.'</p>' |
); |
); |
|
#-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 |
#----------Print last update |
my $lastmod=$syllabus{'uploaded.lastmodified'}; |
my $lastmod=$syllabus{'uploaded.lastmodified'}; |
$lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never')); |
$lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never')); |