--- loncom/localize/lonlocal.pm 2005/11/10 19:19:51 1.35 +++ loncom/localize/lonlocal.pm 2005/11/14 19:53:03 1.36 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Localization routines # -# $Id: lonlocal.pm,v 1.35 2005/11/10 19:19:51 www Exp $ +# $Id: lonlocal.pm,v 1.36 2005/11/14 19:53:03 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -163,7 +163,6 @@ package Apache::lonlocal; use strict; use Apache::Constants qw(:common); use Apache::localize; -use Apache::File; use locale; use POSIX qw(locale_h); @@ -179,9 +178,9 @@ use vars qw($lh); # ===================================================== The "MakeText" function sub mt (@) { -# my $fh=Apache::File->new('>>/home/www/loncapa/loncom/localize/localize/newphrases.txt'); -# print $fh @_[0]."\n"; -# $fh->close(); +# open(LOG,'>>/home/www/loncapa/loncom/localize/localize/newphrases.txt'); +# print LOG (@_[0]."\n"); +# close(LOG); if ($lh) { return $lh->maketext(@_); } else {