--- loncom/interface/lonhelp.pm	2003/08/29 02:45:07	1.9
+++ loncom/interface/lonhelp.pm	2003/09/22 04:14:04	1.10
@@ -150,6 +150,8 @@ sub handler
      
      return HTTP_NOT_FOUND if ($filenames !~ /\A[-0-9a-zA-z_'',:.]+\Z/);
 
+     &Apache::lonlocal::get_language_handle($r);
+
      # Join together the tex files, return HTTP_NOT_FOUND if any of
      # them are not found
      my $tex = '';
@@ -160,6 +162,10 @@ sub handler
      my @files = split(/,/, $filenames);
      
      for my $filename (@files) {
+	 if (-e $docroot.'/adm/help/tex/'.$filename.'_'.
+	     &Apache::lonlocal::current_language().'.tex') {
+	     $filename.='_'.&Apache::lonlocal::current_language();
+	 }
 	 (my $file = Apache::File->new($docroot
 			   . '/adm/help/tex/'.$filename.'.tex'))
 	     or return HTTP_NOT_FOUND;
@@ -170,7 +176,7 @@ sub handler
      &Apache::lonacc::handler($r);
 
      if ($ENV{'browser.mathml'}) {
-	 $r->content_type('text/xml');
+	 &Apache::loncommon::content_type($r,'text/xml');
 	 &tth::ttminit();
 	 if ($ENV{'browser.unicode'}) {
 	     &tth::ttmoptions('-L -u1');
@@ -178,7 +184,7 @@ sub handler
 	     &tth::ttmoptions('-L -u0');
 	 }
      } else {
-	 $r->content_type("text/html");
+	 &Apache::loncommon::content_type($r,"text/html");
 	 &tth::tthinit();
 	 if ($ENV{'browser.unicode'}) {
 	     &tth::tthoptions('-L -u1');