--- loncom/homework/structuretags.pm 2008/02/13 16:21:44 1.419 +++ loncom/homework/structuretags.pm 2008/05/27 22:25:56 1.421 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.419 2008/02/13 16:21:44 bisitz Exp $ +# $Id: structuretags.pm,v 1.421 2008/05/27 22:25:56 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -451,13 +451,33 @@ $show_all $show_all "; } - + my %langchoices=('' => ''); + foreach (&Apache::loncommon::languageids()) { + if (&Apache::loncommon::supportedlanguagecode($_)) { + $langchoices{&Apache::loncommon::supportedlanguagecode($_)} + = &Apache::loncommon::plainlanguagedescription($_); + } + } $result.=' '.&mt('Apply style file: ').' &').'" /> '.&mt('Select').' +
+ '. + &mt('Language: '). + &Apache::loncommon::select_form($env{'form.languages'},'languages', + %langchoices).' + + '. + &mt('Math Rendering: '). + &Apache::loncommon::select_form($env{'form.texengine'},'texengine', + ('' => '', + 'tth' => 'tth', + 'jsMath' => 'jsMath', + 'mimetex' => 'mimetex')).' +