Diff for /rat/lonuserstate.pm between versions 1.149.2.2.2.2 and 1.155

version 1.149.2.2.2.2, 2020/01/21 02:50:46 version 1.155, 2018/03/29 19:59:08
Line 255  sub loadmap { Line 255  sub loadmap {
  push(@map_ids, $resource_id);   push(@map_ids, $resource_id);
                 if ($hash{'src_'.$lpc.'.'.$resource_id}) {                  if ($hash{'src_'.$lpc.'.'.$resource_id}) {
                     $rescount{$lpc} ++;                      $rescount{$lpc} ++;
                     if (($hash{'src_'.$lpc.'.'.$resource_id}=~/\.sequence$/) ||                      if (($hash{'src_'.$lpc.'.'.$resource_id}=~/\.sequence$/) || 
                         ($hash{'src_'.$lpc.'.'.$resource_id}=~/\.page$/)) {                          ($hash{'src_'.$lpc.'.'.$resource_id}=~/\.page$/)) {
                         $mapcount{$lpc} ++;                          $mapcount{$lpc} ++; 
                     }                      }
                 }                  }
                 unless ($codechecked) {                  unless ($codechecked) {
Line 1229  sub readmap { Line 1229  sub readmap {
     undef %randompick;      undef %randompick;
     undef %randompickseed;      undef %randompickseed;
     undef %randomorder;      undef %randomorder;
     undef %randomizationcode;  
     undef %hiddenurl;      undef %hiddenurl;
     undef %encurl;      undef %encurl;
     undef %rescount;  
     undef %mapcount;  
     $retfrid='';      $retfrid='';
     $errtext='';      $errtext='';
     my ($untiedhash,$untiedparmhash,$tiedhash,$tiedparmhash); # More state flags.      my ($untiedhash,$untiedparmhash,$tiedhash,$tiedparmhash); # More state flags.
Line 1377  sub readmap { Line 1374  sub readmap {
         undef %randompick;          undef %randompick;
         undef %randompickseed;          undef %randompickseed;
         undef %randomorder;          undef %randomorder;
         undef %randomizationcode;  
         undef %hiddenurl;          undef %hiddenurl;
         undef %encurl;          undef %encurl;
         undef %rescount;  
         undef %mapcount;  
         $errtext='';          $errtext='';
         $retfrid='';          $retfrid='';
  #   #

Removed from v.1.149.2.2.2.2  
changed lines
  Added in v.1.155


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