version 1.70, 2008/09/11 02:07:27
|
version 1.71, 2008/11/11 10:45:22
|
Line 134 sub handler {
|
Line 134 sub handler {
|
'"</h2>'); |
'"</h2>'); |
} |
} |
if ($target ne 'tex') { |
if ($target ne 'tex') { |
$r->print('<h3>'.&Apache::lonnet::domain($cdom,'description').'</h3>'. |
$r->print('<h3>'.&Apache::lonnet::domain($cdom,'description').'</h3>');#OLD SendMessage POS |
'<p>'.&Apache::loncommon::messagewrapper(&mt('Send me a message'),$cnum,$cdom).'</p>'.&Apache::lonrss::advertisefeeds($cnum,$cdom)); |
|
} else { |
} else { |
$r->print('\textbf{'.&Apache::lonnet::domain($cdom,'description').'}\\\\'); |
$r->print('\textbf{'.&Apache::lonnet::domain($cdom,'description').'}\\\\'); |
} |
} |
Line 191 sub handler {
|
Line 190 sub handler {
|
&Apache::lonnet::put('aboutme',\%syllabus,$cdom,$cnum); |
&Apache::lonnet::put('aboutme',\%syllabus,$cdom,$cnum); |
} |
} |
|
|
|
my $lastmod; |
|
my $image; |
# ---------------------------------------------------------------- Get syllabus |
# ---------------------------------------------------------------- Get syllabus |
if (($syllabus{'uploaded.lastmodified'}) || ($allowed)) { |
if (($syllabus{'uploaded.lastmodified'}) || ($allowed)) { |
my $lastmod=$syllabus{'uploaded.lastmodified'}; |
$lastmod=$syllabus{'uploaded.lastmodified'}; |
$lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never')); |
$lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never')); |
$r->print(&mt('Last updated').': '.$lastmod); |
# $r->print(&mt('Last updated').': '.$lastmod); #Old Last Modifi Pos |
if ($syllabus{'uploaded.photourl'}) { |
if ($syllabus{'uploaded.photourl'}) { |
&Apache::lonnet::allowuploaded('/adm/aboutme', |
&Apache::lonnet::allowuploaded('/adm/aboutme', |
$syllabus{'uploaded.photourl'}); |
$syllabus{'uploaded.photourl'}); |
my $image= |
$image= |
qq{<img src="$syllabus{'uploaded.photourl'}" align="right" />}; |
qq{<img src="$syllabus{'uploaded.photourl'}" style="vertical-align:text-top;float:right;" />}; |
if ($target eq 'tex') { |
if ($target eq 'tex') { |
$image=&Apache::lonxml::xmlparse($r,'tex',$image); |
$image=&Apache::lonxml::xmlparse($r,'tex',$image); |
} |
} |
$r->print($image); |
# $r->print($image); #Print old Image |
} |
} |
if ($allowed) { |
if ($allowed) { |
$r->print( |
$r->print( |
Line 219 sub handler {
|
Line 220 sub handler {
|
'</form><form method="post">'); |
'</form><form method="post">'); |
|
|
} |
} |
|
|
|
if($target ne 'tex') |
|
{ |
|
$r->print('<div style="left:0; width:75%">'); |
|
} |
|
|
foreach my $field (sort(keys(%syllabusfields))) { |
foreach my $field (sort(keys(%syllabusfields))) { |
if (($syllabus{$field}) || ($allowed)) { |
if (($syllabus{$field}) || ($allowed)) { |
my $message=$syllabus{$field}; |
my $message=$syllabus{$field}; |
Line 230 sub handler {
|
Line 237 sub handler {
|
} |
} |
$message=&Apache::lontexconvert::msgtexconverted($message); |
$message=&Apache::lontexconvert::msgtexconverted($message); |
if ($target ne 'tex') { |
if ($target ne 'tex') { |
$r->print('<h3>'.$syllabusfields{$field}.'</h3><blockquote>'. |
|
$message.'</blockquote>'); |
# Start Neu |
|
$r->print('<fieldset><legend><b>'.$syllabusfields{$field}.'</b></legend>'); |
|
$r->print($message); |
|
$r->print('</fieldset><br />'); |
|
#Ende NEU |
|
|
|
# $r->print('<h3>'.$syllabusfields{$field}. 'MESSAGE ____' .'</h3><blockquote>'. |
|
# $message.'</blockquote>'); |
} else { |
} else { |
$r->print('\\\\\textbf{'.$syllabusfields{$field}.'}\\\\'. |
$r->print('\\\\\textbf{'.$syllabusfields{$field}.'}\\\\'. |
&Apache::lonxml::xmlparse($r,'tex',$message).'\\\\'); |
&Apache::lonxml::xmlparse($r,'tex',$message).'\\\\'); |
Line 244 sub handler {
|
Line 258 sub handler {
|
} |
} |
} |
} |
} |
} |
|
if($target ne 'tex') |
|
{ |
|
|
|
&print_portfiles_link($r,$is_course); |
|
|
|
$r->print('</div>'); |
|
$r->print('<div style="margin:0 0 0 75">'); |
|
$r->print($image); |
|
|
|
$r->print('<p style="clear:both">'); |
|
$r->print('<div style="border:1px solid #000000;float:right">'); |
|
$r->print('<div style="border-bottom:1px solid #000000; background-color:#efefef;">'); |
|
$r->print('Kontakt'); |
|
$r->print('</div>'); |
|
$r->print('safasf@dsf.de'); |
|
$r->print(&Apache::loncommon::messagewrapper(&mt('Send me a message'),$cnum,$cdom).'</p>'.&Apache::lonrss::advertisefeeds($cnum,$cdom)); |
|
|
|
$r->print('</div></div>'); |
|
|
|
} |
|
|
if ($allowed) { |
if ($allowed) { |
if ($env{'form.popup'}) { |
if ($env{'form.popup'}) { |
$r->print('<input type="hidden" name="popup" value="'. |
$r->print('<input type="hidden" name="popup" value="'. |
Line 257 sub handler {
|
Line 292 sub handler {
|
} |
} |
|
|
if ($target ne 'tex') { |
if ($target ne 'tex') { |
&print_portfiles_link($r,$is_course); |
# &print_portfiles_link($r,$is_course); #old Print files |
|
|
} |
} |
|
|
if ($env{'request.course.id'} |
if ($env{'request.course.id'} |
Line 291 sub handler {
|
Line 327 sub handler {
|
if ($env{'form.popup'}) { |
if ($env{'form.popup'}) { |
$r->print('<p><a href="javascript:window.close()">'.&mt('Close window').'</a>'); |
$r->print('<p><a href="javascript:window.close()">'.&mt('Close window').'</a>'); |
} |
} |
|
$r->print('<br />'.&mt('Last updated').': '.$lastmod); |
|
|
$r->print(&Apache::loncommon::end_page()); |
$r->print(&Apache::loncommon::end_page()); |
} else { |
} else { |
$r->print('\end{document}'); |
$r->print('\end{document}'); |
} |
} |
|
|
|
|
|
|
return OK; |
return OK; |
} |
} |
|
|
Line 348 sub print_portfiles_link {
|
Line 389 sub print_portfiles_link {
|
difl => 'Display file listing', |
difl => 'Display file listing', |
); |
); |
if ($filecounts->{'both'} > 0) { |
if ($filecounts->{'both'} > 0) { |
$output = '<h3>'.($is_course?$lt{'vgpf'}:$lt{'vpfi'}).'</h3>'; |
$output = '<fieldset><legend><b>'; |
|
$output .= ($is_course?$lt{'vgpf'}:$lt{'vpfi'}).'</b></legend><br />'; |
|
|
|
#$output = '<h3>'.($is_course?$lt{'vgpf'}:$lt{'vpfi'}).'</h3>'; |
$output .= '<a href="/adm/'.$cdom.'/'.$cnum.'/aboutme/portfolio'. |
$output .= '<a href="/adm/'.$cdom.'/'.$cnum.'/aboutme/portfolio'. |
$query_string.'">'.$lt{'difl'}. |
$query_string.'">'.$lt{'difl'}. |
'</a><br /><br />'; |
'</a><br /><br />'; |
Line 372 sub print_portfiles_link {
|
Line 416 sub print_portfiles_link {
|
$output .= '<li>'.&mt('[quant,_1,file requires,files require] a passphrase for access.',$filecounts->{'withpass'}).'</li>'; |
$output .= '<li>'.&mt('[quant,_1,file requires,files require] a passphrase for access.',$filecounts->{'withpass'}).'</li>'; |
} |
} |
$output .= '</ul>'; |
$output .= '</ul>'; |
|
$output .='</fieldset>'; |
} |
} |
$r->print($output); |
$r->print($output); |
return; |
return; |