--- loncom/interface/lonsyllabus.pm 2009/04/21 17:54:27 1.87
+++ loncom/interface/lonsyllabus.pm 2009/05/11 13:34:10 1.89
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Syllabus
#
-# $Id: lonsyllabus.pm,v 1.87 2009/04/21 17:54:27 neumanie Exp $
+# $Id: lonsyllabus.pm,v 1.89 2009/05/11 13:34:10 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -248,19 +248,40 @@ if( ($allowed) && ($target ne 'tex') ) {
#-Print Help Text
if ($target ne 'tex') {
- if($allowed){
+ 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'));
+ my $who = &Apache::loncommon::aboutmewrapper(
+ &Apache::loncommon::plainname($syllabus{'uploaded.name'},
+ $syllabus{'uploaded.domain'}),$syllabus{'uploaded.name'},
+ $syllabus{'uploaded.domain'});
+ if ($target ne 'tex') {
+ $r->print('
'.&mt('Last updated').': '.
+ $lastmod . ' '.
+ ($who ? &mt('by').' '.$who
+ : '' ) .
+ '
' );
+
+ } else {
+ $r->print('\\\\ '.&mt('Last updated').': '.$lastmod.' '.
+ ($who? &mt('by').'\\\\ '.
+ &Apache::loncommon::plainname($syllabus{'uploaded.name'},$syllabus{'uploaded.domain'})
+ :'')
+ .'\\\\');
+ }
#--------Functions
if ($target ne 'tex') {
- if($allowed || $privileged){
+ if( $allowed || $privileged) {
$r->print(&Apache::lontemplate::start_functionslist());
- if($allowed){
+ if ($allowed) {
$r->print(&Apache::lontemplate::item_functionslist(
''.&mt('Show Public View').''
.&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView')));
- }elsif($privileged){
+ } elsif ($privileged) {
$r->print(&Apache::lontemplate::item_functionslist(
''.&mt('Edit').''));
}
@@ -268,10 +289,10 @@ if ($target ne 'tex') {
}
}
#----------------------------Print Headtitle
-if($target ne 'tex'){
+if ($target ne 'tex') {
$r->print(''.$courseenv{'description'}.'
');
$r->print(''. &Apache::lonnet::domain($cdom,'description').'
');
-}else{
+} else {
$r->print('\noindent{\large\textbf{'.$courseenv{'description'}.'}}\\\\\\\\\textbf{'.
&Apache::lonnet::domain($cdom,'description').'}\\\\');
}
@@ -318,38 +339,17 @@ if($target ne 'tex'){
} else {
$r->print('\end{tabular}\\\\');
}
-#----------Print last update
- my $lastmod=$syllabus{'uploaded.lastmodified'};
- $lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never'));
- my $who = &Apache::loncommon::aboutmewrapper(
- &Apache::loncommon::plainname($syllabus{'uploaded.name'},
- $syllabus{'uploaded.domain'}),$syllabus{'uploaded.name'},
- $syllabus{'uploaded.domain'});
- if ($target ne 'tex') {
- $r->print(''.&mt('Last updated').': | '.
- $lastmod.' | '.
- ($who ? &mt('by').' '.$who
- : '' ).
- ' |
');
- } else {
- $r->print('\\\\ '.&mt('Last updated').': '.$lastmod.' '.
- ($who? &mt('by').'\\\\ '.
- &Apache::loncommon::plainname($syllabus{'uploaded.name'},$syllabus{'uploaded.domain'})
- :'')
- .'\\\\');
- }
# -------------------------------------------------------------- Announcements?
my $day = &Apache::lonannounce::showday(time,2,
&Apache::lonannounce::readcalendar($cdom.'_'.$cnum));
if ($target ne 'tex') {
- if($allowed){
+ if ($allowed) {
&Apache::lontemplate::print_start_template($r,'RSS Feeds and Blogs','LC_ContentBoxSpecial');
$r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom,$forceedit));
my $editurl= &Apache::lonnet::absolute_url().'/adm/'.$cdom.'/'.$cnum.'/_rss.html';
$r->print( ''.&mt('New RSS Feed or Blog').'');
&Apache::lontemplate::print_end_template($r);
- }
- elsif(&Apache::lonrss::advertisefeeds($cnum,$cdom) ne ''){
+ } elsif (&Apache::lonrss::advertisefeeds($cnum,$cdom) ne '') {
&Apache::lontemplate::print_start_template($r,'RSS Feeds and Blogs','LC_ContentBoxSpecial');
$r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom,$forceedit));
&Apache::lontemplate::print_end_template($r);
@@ -382,7 +382,7 @@ if($target ne 'tex'){
} elsif ($embstyle eq 'img') {# embed as an image
$output='
';
}
- if($output ne ''){
+ if ($output ne '') {
if ($target ne 'tex') {
$message.=''.$output.'
';
} else {
@@ -404,7 +404,7 @@ if($target ne 'tex'){
}
$message=&Apache::lontexconvert::msgtexconverted($message);
if ($target ne 'tex') {
- if($allowed){
+ if ($allowed) {
$r->print('');
}
&Apache::lontemplate::print_template($r, $syllabusfields{$field}, $message,$allowed,'LC_ContentBoxSpecial');
@@ -415,7 +415,7 @@ if($target ne 'tex'){
push(@htmlids,$field);
}
if ($allowed) {
- if($target ne 'tex'){
+ if ($target ne 'tex') {
$r->print('
');
&Apache::lontemplate::print_editbox_template($r, $syllabus{$field}, $field);
}