--- loncom/misc/refresh_courseids_db.pl	2014/06/07 19:13:51	1.19
+++ loncom/misc/refresh_courseids_db.pl	2017/06/26 01:50:11	1.21
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 # The LearningOnline Network
 #
-# $Id: refresh_courseids_db.pl,v 1.19 2014/06/07 19:13:51 raeburn Exp $
+# $Id: refresh_courseids_db.pl,v 1.21 2017/06/26 01:50:11 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -122,7 +122,7 @@ sub recurse_courses {
         closedir(DIR);
         $depth ++;
         foreach my $item (@contents) {
-            if ($depth < 4) {
+            if (($depth < 4) && (length($item) == 1)) {
                 &recurse_courses($cdom,$dir.'/'.$item,$depth,$courseshash,
                                  $currhash,$lastaccess,$autoassign,$fh);
             } elsif ($item =~ /^$match_courseid$/) {
@@ -333,7 +333,6 @@ sub recurse_courses {
                             $changes{'internal.releaserequired'} = $releasereq;
                         } else {
                             if ($courseinfo{'internal.releaserequired'} ne $releasereq) {
-                        
                                 $changes{'internal.releaserequired'} = $releasereq;
                             }
                         }