Diff for /rat/lonratedt.pm between versions 1.32 and 1.33

version 1.32, 2002/08/20 13:02:41 version 1.33, 2002/08/26 12:38:40
Line 38  use Apache::lonnet; Line 38  use Apache::lonnet;
 use Apache::lonratsrv;  use Apache::lonratsrv;
 use Apache::lonsequence;  use Apache::lonsequence;
   
 my @order;  use vars qw(@order @resources);
 my @resources;  
   
   
 # Mapread read maps into global arrays @links and @resources, determines status  # Mapread read maps into global arrays @links and @resources, determines status
Line 318  sub startfinish { Line 317  sub startfinish {
     }      }
    my ($name,$url,$ext)=split(/\:/,$resources[$order[0]]);     my ($name,$url,$ext)=split(/\:/,$resources[$order[0]]);
    $resources[$order[0]]=$name.':'.$url.':'.$ext.':start:res';     $resources[$order[0]]=$name.':'.$url.':'.$ext.':start:res';
      if ($#order==0) {
          $resources[$#resources+1]='::false';
          $order[1]=$#resources;
      }
    my ($name,$url,$ext)=split(/\:/,$resources[$order[$#order]]);     my ($name,$url,$ext)=split(/\:/,$resources[$order[$#order]]);
    $resources[$order[$#order]]=$name.':'.$url.':'.$ext.':finish:res';     $resources[$order[$#order]]=$name.':'.$url.':'.$ext.':finish:res';
 }  }

Removed from v.1.32  
changed lines
  Added in v.1.33


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