[LON-CAPA-cvs] cvs: loncom /misc refresh_courseids_db.pl

[raeburn]

raeburn		Wed Apr 22 16:43:56 2020 EDT

  Modified files:              
    /loncom/misc	refresh_courseids_db.pl 
  Log:
  - Set $env{'request.role.adv'} for call to lonrelrequtils::get_release_req
    (new dependency in &retrieveResources() in lonnavmaps.pm rev. 1.550)
  
  
Index: loncom/misc/refresh_courseids_db.pl
diff -u loncom/misc/refresh_courseids_db.pl:1.21 loncom/misc/refresh_courseids_db.pl:1.22
--- loncom/misc/refresh_courseids_db.pl:1.21	Mon Jun 26 01:50:11 2017
+++ loncom/misc/refresh_courseids_db.pl	Wed Apr 22 16:43:56 2020
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 # The LearningOnline Network
 #
-# $Id: refresh_courseids_db.pl,v 1.21 2017/06/26 01:50:11 raeburn Exp $
+# $Id: refresh_courseids_db.pl,v 1.22 2020/04/22 16:43:56 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -224,11 +224,13 @@
                 if (($chome ne '')  && ($lastaccess->{$cid} > $twodaysago)) {
                     $env{'request.course.id'} = $cdom.'_'.$cnum;
                     $env{'request.role'} = 'cc./'.$cdom.'/'.$cnum;
+                    $env{'request.role.adv'} = 1;
 
                     my $readmap = 1;
                     ($reqdmajor,$reqdminor) = &Apache::lonrelrequtils::get_release_req($cnum,$cdom,
                                                                                        $crstype,$readmap,
                                                                                        $globals_set);
+                    delete($env{'request.role.adv'});
                     delete($env{'request.course.id'});
                     delete($env{'request.role'});
                 } elsif ($releaserequired) {