- Timestamp:
- 05/13/16 16:59:48 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cgi-bin/ipdb-rpc.cgi
r870 r876 326 326 "SELECT id FROM poolips WHERE ip = ? AND ".($args{parent} ? "parent_id = ?" : "vrf = ?"), 327 327 undef, $args{block}, ($args{parent} ? $args{parent} : $args{vrf}) ); 328 warn "passed block $args{block} guessed as $args{block}\n";329 328 } 330 329 331 330 # snag block info for log 332 331 my $blockinfo = getBlockData($ip_dbh, $args{block}, $args{type}); 333 my ($code,$msg) = deleteBlock($ip_dbh, $args{block}, $args{type}, $args{delf wd}, $args{rpcuser});332 my ($code,$msg) = deleteBlock($ip_dbh, $args{block}, $args{type}, $args{delforward}, $args{rpcuser}); 334 333 335 334 my $authuser = "$args{rpcsystem}/$args{rpcuser}";
Note:
See TracChangeset
for help on using the changeset viewer.