Diff for /loncom/lond between versions 1.561 and 1.562

version 1.561, 2020/03/30 11:04:03 version 1.562, 2020/05/04 17:05:10
Line 4887  sub course_sessions_handler { Line 4887  sub course_sessions_handler {
             next if ($filename=~/^\./);              next if ($filename=~/^\./);
             next if ($filename=~/^publicuser_/);              next if ($filename=~/^publicuser_/);
             next if ($filename=~/^[a-f0-9]+_(linked|lti_\d+)\.id$/);              next if ($filename=~/^[a-f0-9]+_(linked|lti_\d+)\.id$/);
             if ($filename =~ /^($LONCAPA::match_user)_\d+_($LONCAPA::match_domain)_/) {              if ($filename =~ /^($LONCAPA::match_username)_\d+_($LONCAPA::match_domain)_/) {
                 my ($uname,$udom) = ($1,$2);                  my ($uname,$udom) = ($1,$2);
                 next unless (-e "$perlvar{'lonDaemons'}/$uname$dbsuffix");                  next unless (-e "$perlvar{'lonDaemons'}/tmp/$uname$dbsuffix");
                 my $mtime = (stat("$perlvar{'lonIDsDir'}/$filename"))[9];                  my $mtime = (stat("$perlvar{'lonIDsDir'}/$filename"))[9];
                 my $since=$now-$mtime;                  my $since=$now-$mtime;
                 if ($lastactivity < 0) {                  if ($lastactivity < 0) {

Removed from v.1.561  
changed lines
  Added in v.1.562


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>