t/01-zone-mk.t
changeset 141 c5584821b795
parent 139 81b171d31830
child 144 be90bcd14ae1
equal deleted inserted replaced
140:6d3403cea852 141:c5584821b795
    20 is($? => 0, "exit on man");
    20 is($? => 0, "exit on man");
    21 
    21 
    22 system("$CMD &>/dev/null");
    22 system("$CMD &>/dev/null");
    23 ok($? > 0, "error on missing args");
    23 ok($? > 0, "error on missing args");
    24 
    24 
    25 my $master_dir = tempdir;
    25 my $master_dir = tempdir CLEANUP => 1;
    26 my $config_dir = tempdir;
    26 my $config_dir = tempdir CLEANUP => 1;
    27 my $tmp = File::Temp->new;
    27 my $tmp = File::Temp->new;
    28 $ENV{DNSTOOLS_CONF} = $tmp->filename;
    28 $ENV{DNSTOOLS_CONF} = $tmp->filename;
    29 
    29 
    30 print $tmp <<__EOF;
    30 print $tmp <<__EOF;
    31 master_dir = $master_dir
    31 master_dir = $master_dir