--- loncom/localize/lonlocal.pm	2004/02/18 23:33:17	1.31
+++ loncom/localize/lonlocal.pm	2005/02/17 08:51:08	1.32
@@ -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_language {
 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';
     }
 }