--- loncom/interface/lontemplate.pm 2009/04/14 15:32:12 1.30 +++ loncom/interface/lontemplate.pm 2010/02/15 20:28:51 1.43.2.1 @@ -1,7 +1,7 @@ # The LearningOnline Network # "Template" Functions to generate html output # -# $Id: lontemplate.pm,v 1.30 2009/04/14 15:32:12 neumanie Exp $ +# $Id: lontemplate.pm,v 1.43.2.1 2010/02/15 20:28:51 faziophi Exp $ # # Copyright Michigan State University Board of Trustees # @@ -43,18 +43,25 @@ 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') { $r->print('