--- loncom/localize/lonlocal.pm 2003/10/10 16:56:16 1.23 +++ loncom/localize/lonlocal.pm 2003/10/11 14:06:01 1.24 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Localization routines # -# $Id: lonlocal.pm,v 1.23 2003/10/10 16:56:16 www Exp $ +# $Id: lonlocal.pm,v 1.24 2003/10/11 14:06:01 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -210,6 +210,20 @@ sub mt (@) { } } +# ================================================================ The tag + +BEGIN { +} + +sub start_mt { + my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; + return &mt(&Apache::lonxml::get_all_text("/mt",$parser)); +} + +sub end_mt { + return ''; +} + # ============================================================== What language? sub current_language { @@ -283,6 +297,7 @@ sub get_language_handle { if (&Apache::lonnet::mod_perl_version == 1) { $r->content_languages([¤t_language()]); } + &Apache::lonxml::register('Apache::lonlocal',('mt')); ### setlocale(LC_ALL,¤t_locale); }