Changeset 37 for trunk/dns.cgi
- Timestamp:
- 11/18/09 13:42:22 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/dns.cgi
r35 r37 68 68 69 69 # default 70 #my $perpage = 15;71 my $perpage = 3;70 my $perpage = 15; 71 #my $perpage = 3; 72 72 my $offset = ($webvar{offset} ? $webvar{offset} : 0); 73 73 … … 601 601 $page->param(rwsoa => $webvar{rwsoa}) if $webvar{rwsoa}; 602 602 $page->param(rwns => $webvar{rwns}) if $webvar{rwns}; 603 $page->param(dominactive => 1) if !$webvar{domactive};603 $page->param(dominactive => 1) if (!$webvar{domactive} && $webvar{doit}); # eww. 604 604 $page->param(importdoms => $webvar{importdoms}) if $webvar{importdoms}; 605 605 ##work … … 623 623 $row{domwarn} = $msg; 624 624 } 625 $row{domerr} = $msg if $code eq 'FAIL'; 625 if ($code eq 'FAIL') { 626 $msg =~ s|\n|<br />|g; 627 $row{domerr} = $msg; 628 } 626 629 # do stuff! DNSDB::importAXFR($webvar{ifrom}, $webvar{rwsoa}, $webvar{rwns}, $domain, <flags>) 627 630 $row{domain} = $domain;
Note:
See TracChangeset
for help on using the changeset viewer.