Diff for /rat/lonratedt.pm between versions 1.68 and 1.69

version 1.68, 2005/06/08 16:10:01 version 1.69, 2005/06/08 16:35:46
Line 205  sub mapread { Line 205  sub mapread {
  my ($command,$number,$content)=split(/\<\:\>/,$_);   my ($command,$number,$content)=split(/\<\:\>/,$_);
         if ($command eq 'objcont') {          if ($command eq 'objcont') {
     my ($title,$src,$ext,$type)=split(/\:/,$content);      my ($title,$src,$ext,$type)=split(/\:/,$content);
       if ($ext eq 'cond') { next; }
     if ($type ne 'zombie') {      if ($type ne 'zombie') {
  $resources[$number]=$content;   $resources[$number]=$content;
     } else {      } else {
Line 556  sub storemap { Line 557  sub storemap {
             }              }
         }          }
     }      }
       for (my $i=0; $i<=$#zombies; $i++) {
           if (defined($zombies[$i])) {
       $output.='<&>objcont<:>'.$i.'<:>'.$zombies[$i];
           }
       }
     $output=~s/http\&colon\;\/\///g;      $output=~s/http\&colon\;\/\///g;
     $env{'form.output'}=$output;      $env{'form.output'}=$output;
     return       return 

Removed from v.1.68  
changed lines
  Added in v.1.69


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