equal
deleted
inserted
replaced
178 |
178 |
179 sub main { |
179 sub main { |
180 my @argv = @_; |
180 my @argv = @_; |
181 my $opt_reference = '127.0.0.1'; |
181 my $opt_reference = '127.0.0.1'; |
182 my $opt_progress = -t; |
182 my $opt_progress = -t; |
183 my ($opt_override)= grep { -f } '/etc/bind/zones.override'; |
183 my ($opt_override)= grep { -f } '/etc/check_dns-delegation/override'; |
184 |
184 |
185 |
185 |
186 GetOptionsFromArray( |
186 GetOptionsFromArray( |
187 \@argv, |
187 \@argv, |
188 'reference=s' => \$opt_reference, |
188 'reference=s' => \$opt_reference, |