--- loncom/interface/lontemplate.pm 2009/02/19 17:32:39 1.17 +++ loncom/interface/lontemplate.pm 2009/12/22 06:22:12 1.42 @@ -1,7 +1,7 @@ # The LearningOnline Network # "Template" Functions to generate html output # -# $Id: lontemplate.pm,v 1.17 2009/02/19 17:32:39 neumanie Exp $ +# $Id: lontemplate.pm,v 1.42 2009/12/22 06:22:12 faziophi Exp $ # # Copyright Michigan State University Board of Trustees # @@ -43,115 +43,105 @@ use Apache::lonlocal; use Apache::lonmsgdisplay(); use HTML::Entities(); +use constant { + RICH_TEXT_ALWAYS_ON => 'LC_richAlwaysOn', + RICH_TEXT_ALWAYS_OFF => 'LC_richAlwaysOff', + RICH_TEXT_DEFAULT_ON => 'LC_richDefaultOn', + RICH_TEXT_DETECT_HTML => 'LC_richDetectHtml', + RICH_TEXT_DEFAULT_OFF => 'LC_richDefaultOff' +}; -sub start_columnSection{ +sub start_columnSection { my ($r) = @_; $r->print('
'); - } - if($field eq 'aaa_contactinfo') { - if($allowed){ $r->print('
'.$content.''); +sub print_end_template { + my ($r) = @_; $r->print('