[LON-CAPA-cvs] cvs: loncom /interface lonmsg.pm

raeburn raeburn@source.lon-capa.org
Mon, 05 Jan 2009 20:04:40 -0000


raeburn		Mon Jan  5 20:04:40 2009 EDT

  Modified files:              
    /loncom/interface	lonmsg.pm 
  Log:
  - Args to loncommon::getlangs() were reversed.
  
  
Index: loncom/interface/lonmsg.pm
diff -u loncom/interface/lonmsg.pm:1.220 loncom/interface/lonmsg.pm:1.221
--- loncom/interface/lonmsg.pm:1.220	Sun Jan  4 16:20:27 2009
+++ loncom/interface/lonmsg.pm	Mon Jan  5 20:04:40 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines for messaging
 #
-# $Id: lonmsg.pm,v 1.220 2009/01/04 16:20:27 raeburn Exp $
+# $Id: lonmsg.pm,v 1.221 2009/01/05 20:04:40 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1032,9 +1032,9 @@
         @userlangs=(@userlangs,split(/\s*(\,|\;|\:)\s*/,
                     $env{'course.'.$fromcid.'.languages'}));
     } else {
-        my %langhash = &Apache::loncommon::getlangs($toudom,$touname);
+        my %langhash = &Apache::loncommon::getlangs($touname,$toudom);
         if ($langhash{'languages'} ne '') {
-            @userlangs = split(/\s*(\,|\;|\:)\s*/,$langhash{'languages'});  
+            @userlangs = split(/\s*(\,|\;|\:)\s*/,$langhash{'languages'});
         } else {
             my %domdefs = &Apache::lonnet::get_domain_defaults($toudom);
             if ($domdefs{'lang_def'} ne '') {