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

raeburn raeburn at source.lon-capa.org
Sun Jan 27 10:46:27 EST 2019


raeburn		Sun Jan 27 15:46:27 2019 EDT

  Modified files:              
    /loncom/interface	lonrequestcourse.pm 
  Log:
  - Trust settings for requesting course creation in another domain.
    - Eliminate %trustchecked (never populated).
  
  
Index: loncom/interface/lonrequestcourse.pm
diff -u loncom/interface/lonrequestcourse.pm:1.105 loncom/interface/lonrequestcourse.pm:1.106
--- loncom/interface/lonrequestcourse.pm:1.105	Thu Dec 27 18:14:25 2018
+++ loncom/interface/lonrequestcourse.pm	Sun Jan 27 15:46:26 2019
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Request a course
 #
-# $Id: lonrequestcourse.pm,v 1.105 2018/12/27 18:14:25 raeburn Exp $
+# $Id: lonrequestcourse.pm,v 1.106 2019/01/27 15:46:26 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3371,14 +3371,14 @@
                     return $env{'user.domain'};
                 }
             }
-            my (@possible_doms,%willtrust,%trustchecked);
+            my (@possible_doms,%willtrust);
             foreach my $type (@{$types}) {
                 my $dom_str = $env{'environment.reqcrsotherdom.'.$type};
                 if ($dom_str ne '') {
                     my @domains = split(',',$dom_str);
                     foreach my $entry (@domains) {
                         my ($extdom,$extopt) = split(':',$entry);
-                        unless ($trustchecked{$extdom}) {
+                        unless (exists($willtrust{$extdom})) {
                             $willtrust{$extdom} = &Apache::lonnet::will_trust('reqcrs',$env{'user.domain'},$extdom);
                         }
                         if ($willtrust{$extdom}) {




More information about the LON-CAPA-cvs mailing list