[LON-CAPA-cvs] cvs: loncom /interface lonaboutme.pm
amueller
lon-capa-cvs-allow@mail.lon-capa.org
Tue, 18 Nov 2008 10:34:45 -0000
amueller Tue Nov 18 10:34:45 2008 EDT
Modified files:
/loncom/interface lonaboutme.pm
Log:
created lontemplate.pm and edit lonaboutme.pm with functions from lontemplate.pm by Niels Neumann
Index: loncom/interface/lonaboutme.pm
diff -u loncom/interface/lonaboutme.pm:1.71 loncom/interface/lonaboutme.pm:1.72
--- loncom/interface/lonaboutme.pm:1.71 Tue Nov 11 10:45:22 2008
+++ loncom/interface/lonaboutme.pm Tue Nov 18 10:34:45 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network
# "About Me" Personal Information
#
-# $Id: lonaboutme.pm,v 1.71 2008/11/11 10:45:22 amueller Exp $
+# $Id: lonaboutme.pm,v 1.72 2008/11/18 10:34:45 amueller Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -37,6 +37,7 @@
use Apache::lonrss();
use Apache::lonlocal;
use Apache::lonmsgdisplay();
+use Apache::lontemplate;
use HTML::Entities();
sub handler {
@@ -221,10 +222,6 @@
}
- if($target ne 'tex')
- {
- $r->print('<div style="left:0; width:75%">');
- }
foreach my $field (sort(keys(%syllabusfields))) {
if (($syllabus{$field}) || ($allowed)) {
@@ -237,45 +234,32 @@
}
$message=&Apache::lontexconvert::msgtexconverted($message);
if ($target ne 'tex') {
-
- # 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>');
+
+ Apache::lontemplate::print_template($r,$syllabusfields{$field},$message);
+
+
+
} else {
$r->print('\\\\\textbf{'.$syllabusfields{$field}.'}\\\\'.
&Apache::lonxml::xmlparse($r,'tex',$message).'\\\\');
}
if ($allowed) {
- $r->print('<br /><textarea cols="80" rows="6" name="'.$field.'">'.
- &HTML::Entities::encode($syllabus{$field},'"&<>').
- '</textarea><input type="submit" name="storesyl" value="'.
- &mt('Save').'" />');
+ Apache::lontemplate::print_editbox_template($r,$syllabusfields{$field},$field);
}
}
}
if($target ne 'tex')
{
- &print_portfiles_link($r,$is_course);
+ &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>');
}