--- loncom/interface/lonpreferences.pm 2009/10/23 15:03:48 1.178
+++ loncom/interface/lonpreferences.pm 2009/12/15 14:52:00 1.181
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Preferences
#
-# $Id: lonpreferences.pm,v 1.178 2009/10/23 15:03:48 bisitz Exp $
+# $Id: lonpreferences.pm,v 1.181 2009/12/15 14:52:00 wenzelju Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -166,8 +166,11 @@ sub languagechanger {
= &Apache::loncommon::plainlanguagedescription($_);
}
}
- my $selectionbox=&Apache::loncommon::select_form($language,'language',
- %langchoices);
+ my $selectionbox=
+ &Apache::loncommon::select_form(
+ $language,
+ 'language',
+ &Apache::lonlocal::texthash(%langchoices));
$r->print(<