--- loncom/interface/loncommon.pm 2005/02/17 08:29:42 1.250 +++ loncom/interface/loncommon.pm 2005/02/25 05:54:01 1.252 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.250 2005/02/17 08:29:42 albertel Exp $ +# $Id: loncommon.pm,v 1.252 2005/02/25 05:54:01 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2632,6 +2632,13 @@ a:focus { color: red; background: yellow END + if ($ENV{'environment.texengine'} eq 'jsMath') { + $bodytag.=''."\n". + ''."\n"; + } + my $upperleft=''.$function.''; if ($bodyonly) { @@ -2750,6 +2757,40 @@ ENDBODY } ############################################### +############################################### + +=pod + +=back + +=head1 HTTP Helpers + +=over 4 + +=item * &endbodytag() + +Returns a uniform footer for LON-CAPA web pages. + +Inputs: + +=over 4 + +=back + +Returns: A uniform footer for LON-CAPA web pages. + +=cut + +sub endbodytag { + my $endbodytag=''; + if ($ENV{'environment.texengine'} eq 'jsMath') { + $endbodytag=''. + "\n".$endbodytag; + } + return $endbodytag; +} + +############################################### =pod