[LON-CAPA-cvs] cvs: loncom /localize lonlocal.pm

[albertel]

albertel		Thu Feb 17 03:51:08 2005 EDT

  Modified files:              
    /loncom/localize	lonlocal.pm 
  Log:
  - if that language doesn't specify the encoding pick utf-8 by default
  
  
Index: loncom/localize/lonlocal.pm
diff -u loncom/localize/lonlocal.pm:1.31 loncom/localize/lonlocal.pm:1.32
--- loncom/localize/lonlocal.pm:1.31	Wed Feb 18 18:33:17 2004
+++ loncom/localize/lonlocal.pm	Thu Feb 17 03:51:08 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Localization routines
 #
-# $Id: lonlocal.pm,v 1.31 2004/02/18 23:33:17 albertel Exp $
+# $Id: lonlocal.pm,v 1.32 2005/02/17 08:51:08 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -208,9 +208,9 @@
 sub current_encoding {
     if ($lh) {
 	my $enc=$lh->maketext('char_encoding');
-	return ($enc eq 'char_encoding'?'':$enc);
+	return ($enc eq 'char_encoding'?'UTF-8':$enc);
     } else {
-	return undef;
+	return 'UTF-8';
     }
 }