--- loncom/interface/lontemplate.pm 2008/12/17 14:56:51 1.13 +++ loncom/interface/lontemplate.pm 2009/03/01 13:23:12 1.21 @@ -1,7 +1,7 @@ # The LearningOnline Network # "Template" Functions to generate html output # -# $Id: lontemplate.pm,v 1.13 2008/12/17 14:56:51 harmsja Exp $ +# $Id: lontemplate.pm,v 1.21 2009/03/01 13:23:12 neumanie Exp $ # # Copyright Michigan State University Board of Trustees # @@ -54,11 +54,11 @@ sub end_columnSection{ $r->print(''); } -sub print_content_template{ +sub print_aboutme_content_template{ my ($r,$allowed,$target,$syllabusfields_ref,$syllabus_ref) = @_; my %syllabusfields = %{$syllabusfields_ref}; my %syllabus = %{$syllabus_ref}; - &start_ContentBox($r,$allowed); + foreach my $field (sort(keys(%syllabusfields))) { if (($syllabus{$field}) || ($allowed)) { my $message=$syllabus{$field}; @@ -72,8 +72,19 @@ sub print_content_template{ if ($target ne 'tex') { if($allowed){ $r->print('
'); - } - &print_template($r,$syllabusfields{$field},$message,$allowed); + } + + if($field eq 'aaa_contactinfo') { + if($allowed){ + $r->print('
'.$content.''); + $r->print('
' .$content . '
'); + $r->print('