Merge pull request #127 from jaredj/test_config_dir
Clearer config_dir() tests
This commit is contained in:
commit
5c72cd23e2
@ -58,12 +58,9 @@ sub __log {
|
|||||||
}
|
}
|
||||||
|
|
||||||
sub __config_dir {
|
sub __config_dir {
|
||||||
my $dir = $config->config_dir('logging');
|
is($Qpsmtpd::Config::dir_memo{bogus}, undef, 'No config_dir cache set yet');
|
||||||
ok($dir, "config_dir, $dir");
|
is($config->config_dir('bogus'), '/var/qmail/control', 'config_dir default value');
|
||||||
|
is($Qpsmtpd::Config::dir_memo{bogus}, '/var/qmail/control', 'config_dir cache set');
|
||||||
#warn Data::Dumper::Dumper($Qpsmtpd::config_dir_memo{logging});
|
|
||||||
$dir = $Qpsmtpd::Config::dir_memo{logging};
|
|
||||||
ok($dir, "config_dir, $dir (memo)");
|
|
||||||
}
|
}
|
||||||
|
|
||||||
sub __clear_cache {
|
sub __clear_cache {
|
||||||
|
Loading…
Reference in New Issue
Block a user