Merge pull request #127 from jaredj/test_config_dir

Clearer config_dir() tests
This commit is contained in:
Matt Simerson 2014-09-18 16:13:12 -07:00
commit 5c72cd23e2

View File

@ -58,12 +58,9 @@ sub __log {
}
sub __config_dir {
my $dir = $config->config_dir('logging');
ok($dir, "config_dir, $dir");
#warn Data::Dumper::Dumper($Qpsmtpd::config_dir_memo{logging});
$dir = $Qpsmtpd::Config::dir_memo{logging};
ok($dir, "config_dir, $dir (memo)");
is($Qpsmtpd::Config::dir_memo{bogus}, undef, 'No config_dir cache set yet');
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');
}
sub __clear_cache {