version 1.86, 2009/04/15 10:49:30
|
version 1.89, 2009/05/11 13:34:10
|
Line 248 if( ($allowed) && ($target ne 'tex') ) {
|
Line 248 if( ($allowed) && ($target ne 'tex') ) {
|
|
|
#-Print Help Text |
#-Print Help Text |
if ($target ne 'tex') { |
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'))); |
$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('<div class="LC_info">'.&mt('Last updated').': '. |
|
$lastmod . ' '. |
|
($who ? &mt('by').' '.$who |
|
: '' ) . |
|
'</div>' ); |
|
|
|
} else { |
|
$r->print('\\\\ '.&mt('Last updated').': '.$lastmod.' '. |
|
($who? &mt('by').'\\\\ '. |
|
&Apache::loncommon::plainname($syllabus{'uploaded.name'},$syllabus{'uploaded.domain'}) |
|
:'') |
|
.'\\\\'); |
|
} |
#--------Functions |
#--------Functions |
if ($target ne 'tex') { |
if ($target ne 'tex') { |
if($allowed || $privileged){ |
if( $allowed || $privileged) { |
$r->print(&Apache::lontemplate::start_functionslist()); |
$r->print(&Apache::lontemplate::start_functionslist()); |
if($allowed){ |
if ($allowed) { |
$r->print(&Apache::lontemplate::item_functionslist( |
$r->print(&Apache::lontemplate::item_functionslist( |
'<a href="'.$r->uri.'?forcestudent=1">'.&mt('Show Public View').'</a>' |
'<a href="'.$r->uri.'?forcestudent=1">'.&mt('Show Public View').'</a>' |
.&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView'))); |
.&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView'))); |
}elsif($privileged){ |
} elsif ($privileged) { |
$r->print(&Apache::lontemplate::item_functionslist( |
$r->print(&Apache::lontemplate::item_functionslist( |
'<a href="'.$r->uri.'?forceedit=1">'.&mt('Edit').'</a>')); |
'<a href="'.$r->uri.'?forceedit=1">'.&mt('Edit').'</a>')); |
} |
} |
Line 268 if ($target ne 'tex') {
|
Line 289 if ($target ne 'tex') {
|
} |
} |
} |
} |
#----------------------------Print Headtitle |
#----------------------------Print Headtitle |
if($target ne 'tex'){ |
if ($target ne 'tex') { |
$r->print('<h1>'.$courseenv{'description'}.'</h1>'); |
$r->print('<h1>'.$courseenv{'description'}.'</h1>'); |
$r->print('<h3>'. &Apache::lonnet::domain($cdom,'description').'</h3>'); |
$r->print('<h3>'. &Apache::lonnet::domain($cdom,'description').'</h3>'); |
}else{ |
} else { |
$r->print('\noindent{\large\textbf{'.$courseenv{'description'}.'}}\\\\\\\\\textbf{'. |
$r->print('\noindent{\large\textbf{'.$courseenv{'description'}.'}}\\\\\\\\\textbf{'. |
&Apache::lonnet::domain($cdom,'description').'}\\\\'); |
&Apache::lonnet::domain($cdom,'description').'}\\\\'); |
} |
} |
Line 318 if($target ne 'tex'){
|
Line 339 if($target ne 'tex'){
|
} else { |
} else { |
$r->print('\end{tabular}\\\\'); |
$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('<table><tr><td>'.&mt('Last updated').':</td><td>'. |
|
$lastmod.'</td><td>'. |
|
($who ? &mt('by').' '.$who |
|
: '' ). |
|
'</td></tr></table>'); |
|
} else { |
|
$r->print('\\\\ '.&mt('Last updated').': '.$lastmod.' '. |
|
($who? &mt('by').'\\\\ '. |
|
&Apache::loncommon::plainname($syllabus{'uploaded.name'},$syllabus{'uploaded.domain'}) |
|
:'') |
|
.'\\\\'); |
|
} |
|
# -------------------------------------------------------------- Announcements? |
# -------------------------------------------------------------- Announcements? |
my $day = &Apache::lonannounce::showday(time,2, |
my $day = &Apache::lonannounce::showday(time,2, |
&Apache::lonannounce::readcalendar($cdom.'_'.$cnum)); |
&Apache::lonannounce::readcalendar($cdom.'_'.$cnum)); |
if ($target ne 'tex') { |
if ($target ne 'tex') { |
if($allowed){ |
if ($allowed) { |
&Apache::lontemplate::print_start_template($r,'RSS Feeds and Blogs','LC_ContentBoxSpecial'); |
&Apache::lontemplate::print_start_template($r,'RSS Feeds and Blogs','LC_ContentBoxSpecial'); |
$r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom,$forceedit)); |
$r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom,$forceedit)); |
|
my $editurl= &Apache::lonnet::absolute_url().'/adm/'.$cdom.'/'.$cnum.'/_rss.html'; |
|
$r->print( '<a href="'.$editurl.'">'.&mt('New RSS Feed or Blog').'</a>'); |
&Apache::lontemplate::print_end_template($r); |
&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'); |
&Apache::lontemplate::print_start_template($r,'RSS Feeds and Blogs','LC_ContentBoxSpecial'); |
$r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom,$forceedit)); |
$r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom,$forceedit)); |
&Apache::lontemplate::print_end_template($r); |
&Apache::lontemplate::print_end_template($r); |
Line 380 if($target ne 'tex'){
|
Line 382 if($target ne 'tex'){
|
} elsif ($embstyle eq 'img') {# embed as an image |
} elsif ($embstyle eq 'img') {# embed as an image |
$output='<img src="'.$filelink.'" />'; |
$output='<img src="'.$filelink.'" />'; |
} |
} |
if($output ne ''){ |
if ($output ne '') { |
if ($target ne 'tex') { |
if ($target ne 'tex') { |
$message.='<p>'.$output.'</p>'; |
$message.='<p>'.$output.'</p>'; |
} else { |
} else { |
Line 402 if($target ne 'tex'){
|
Line 404 if($target ne 'tex'){
|
} |
} |
$message=&Apache::lontexconvert::msgtexconverted($message); |
$message=&Apache::lontexconvert::msgtexconverted($message); |
if ($target ne 'tex') { |
if ($target ne 'tex') { |
if($allowed){ |
if ($allowed) { |
$r->print('<p>'); |
$r->print('<p>'); |
} |
} |
&Apache::lontemplate::print_template($r, $syllabusfields{$field}, $message,$allowed,'LC_ContentBoxSpecial'); |
&Apache::lontemplate::print_template($r, $syllabusfields{$field}, $message,$allowed,'LC_ContentBoxSpecial'); |
Line 413 if($target ne 'tex'){
|
Line 415 if($target ne 'tex'){
|
push(@htmlids,$field); |
push(@htmlids,$field); |
} |
} |
if ($allowed) { |
if ($allowed) { |
if($target ne 'tex'){ |
if ($target ne 'tex') { |
$r->print('</p>'); |
$r->print('</p>'); |
&Apache::lontemplate::print_editbox_template($r, $syllabus{$field}, $field); |
&Apache::lontemplate::print_editbox_template($r, $syllabus{$field}, $field); |
} |
} |