Changeset 439
- Timestamp:
- 11/02/12 13:17:57 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/DNSDB.pm
r436 r439 3438 3438 $sql .= "WHERE "._recparent($args{defrec},$args{revrec})." = ?"; 3439 3439 $sql .= " AND NOT r.type=$reverse_typemap{SOA}"; 3440 $sql .= " AND host ~* ?" if $args{filter};3440 $sql .= " AND (r.host ~* ? OR r.val ~* ?)" if $args{filter}; 3441 3441 $sql .= " ORDER BY $newsort $args{sortorder}"; 3442 3442 # ensure consistent ordering by sorting on record_id too … … 3445 3445 3446 3446 my @bindvars = ($args{id}); 3447 push @bindvars, $args{filter}if $args{filter};3447 push @bindvars, ($args{filter},$args{filter}) if $args{filter}; 3448 3448 3449 3449 my $ret = $dbh->selectall_arrayref($sql, { Slice => {} }, (@bindvars) );
Note:
See TracChangeset
for help on using the changeset viewer.