Changeset 274 for branches/dns/cgi-bin


Ignore:
Timestamp:
08/09/05 17:17:29 (19 years ago)
Author:
Kris Deugau
Message:

/branches/dns

Fix missed name change for variable in new subst_rDNS function

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/dns/cgi-bin/IPDB.pm

    r273 r274  
    655655
    656656  my ($o1,$o2,$o3,$o4) = ($ip =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)/);
    657   $rdns =~ s/\%o1\%/$o1/;
    658   $rdns =~ s/\%o2\%/$o2/;
    659   $rdns =~ s/\%o3\%/$o3/;
    660   $rdns =~ s/\%o4\%/$o4/;
    661   $rdns =~ s/\%d\%/$o1$-o2-$o3-$o4/;
    662 
    663   return $rdns;
     657  $template =~ s/\%o1\%/$o1/;
     658  $template =~ s/\%o2\%/$o2/;
     659  $template =~ s/\%o3\%/$o3/;
     660  $template =~ s/\%o4\%/$o4/;
     661  $template =~ s/\%d\%/$o1$-o2-$o3-$o4/;
     662
     663  return $template;
    664664} # end subst_rDNS()
    665665
Note: See TracChangeset for help on using the changeset viewer.