Changeset 578
- Timestamp:
- 12/28/12 16:21:18 (13 years ago)
- File:
- 
      - 1 edited
 
 - 
          
  trunk/cgi-bin/IPDB.pm (modified) (2 diffs)
 
Legend:
- Unmodified
- Added
- Removed
- 
      trunk/cgi-bin/IPDB.pmr576 r578 800 800 $msg .= ": $@"; 801 801 eval { $dbh->rollback; }; 802 return ('FAIL', $msg);802 return ('FAIL', $msg); 803 803 } else { 804 return ('OK', "$args{cidr}");804 return ('OK', $args{cidr}); 805 805 } 806 806 … … 825 825 my $rtype = $1; 826 826 $dbh->do("UPDATE freeblocks SET routed=?,rdepth=rdepth+1,city=?,parent=? WHERE cidr=? AND rdepth=?", 827 undef, ($rtype, $args{city}, $args{cidr}, $args{cidr}, $args{rdepth}) );827 undef, ($rtype, $args{city}, $args{cidr}, $args{cidr}, $args{rdepth}) ); 828 828 } else { 829 829 # "normal" case 
  Note:
 See   TracChangeset
 for help on using the changeset viewer.
  ![[ DeepNet IP Database ]](/images/ipdb-logo.png)
