[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /interface selfenroll.pm

[raeburn]

raeburn		Sun Jun 20 16:23:21 2021 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/interface	selfenroll.pm 
  Log:
  - For 2.11
    Backport 1.37
  
  
Index: loncom/interface/selfenroll.pm
diff -u loncom/interface/selfenroll.pm:1.27.2.6 loncom/interface/selfenroll.pm:1.27.2.7
--- loncom/interface/selfenroll.pm:1.27.2.6	Thu Jan  9 17:36:09 2020
+++ loncom/interface/selfenroll.pm	Sun Jun 20 16:23:21 2021
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Allow users to self-enroll in a course
 #
-# $Id: selfenroll.pm,v 1.27.2.6 2020/01/09 17:36:09 raeburn Exp $
+# $Id: selfenroll.pm,v 1.27.2.7 2021/06/20 16:23:21 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -793,7 +793,7 @@
                                         'internal.sectionnums',
                                         'internal.crosslistings'],$cdom,$cnum);
     my (@allcourses,%LC_code,%affiliates,%reply);
-    &Apache::loncommon::get_institutional_codes(\%settings,\@allcourses,\%LC_code);
+    &Apache::loncommon::get_institutional_codes($cdom,$cnum,\%settings,\@allcourses,\%LC_code);
     if (@allcourses > 0) {
         @{$affiliates{$cnum}} = @allcourses;
         my $outcome = &Apache::lonnet::fetch_enrollment_query('updatenow',\%affiliates,\%reply,$cdom,$cnum);