loncom/localize/lonlocal.pm - diff

Return to lonlocal.pm CVS log

Up to [LON-CAPA] / loncom / localize

version 1.24, 2003/10/11 14:06:01	version 1.25, 2003/10/11 21:06:11
Line 210 sub mt (@) {	Line 210 sub mt (@) {
}	}
}	}

# ================================================================ The <mt> 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?	# ============================================================== What language?

sub current_language {	sub current_language {
Line 297 sub get_language_handle {	Line 283 sub get_language_handle {
if (&Apache::lonnet::mod_perl_version == 1) {	if (&Apache::lonnet::mod_perl_version == 1) {
$r->content_languages([&current_language()]);	$r->content_languages([&current_language()]);
}	}
&Apache::lonxml::register('Apache::lonlocal',('mt'));
### setlocale(LC_ALL,&current_locale);	### setlocale(LC_ALL,&current_locale);
}	}