t/02-dnssec-keytool.t
branchfoerste
changeset 149 44183c6b78b6
parent 147 9038188cbc41
equal deleted inserted replaced
148:b0fd381a4b53 149:44183c6b78b6
    21 is($? => 0, "exit on man");
    21 is($? => 0, "exit on man");
    22 
    22 
    23 system("$CMD >/dev/null 2>&1");
    23 system("$CMD >/dev/null 2>&1");
    24 ok($? > 0, "error on missing args");
    24 ok($? > 0, "error on missing args");
    25 
    25 
    26 $_ = File::Temp::tempdir CLEANUP => 1 or die "Can't make temporary directory" for my ($master_dir, $config_dir);
    26 #$_ = File::Temp::tempdir CLEANUP => 1 or die "Can't make temporary directory" for my ($master_dir, $config_dir);
    27 my $tmp = Aux::make_config {
    27 my $tmp = Aux::make_config;
    28     master_dir => $master_dir,
       
    29     zone_conf_dir => $config_dir,
       
    30     hostmaster => 'hostmaster@schlittermann.de',
       
    31     template_dir => './templates'
       
    32 };
       
    33 $ENV{DNSTOOLS_CONF} = $tmp->filename;
    28 $ENV{DNSTOOLS_CONF} = $tmp->filename;
    34 
    29 
    35 system("perl -Mblib blib/sbin/zone-mk xxx $zone >/dev/null 2>&1");
    30 system("perl -Mblib blib/sbin/zone-mk xxx $zone >/dev/null 2>&1");
    36 die "zone creation failed" if $?;
    31 die "zone creation failed" if $?;
    37 
    32