blob: 02a309520a9e9cf76eaa3d21ca18f025f527544c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
# -*- mode: cperl -*-
use Test::More tests => 6;
use strict;
use warnings;
require_ok 'SpamCat::Conf';
ok(SpamCat::Conf->can('read'));
my %conf = SpamCat::Conf::read('t/fixtures/sample.conf');
ok(%conf);
is($conf{dbpath}, '/tmp/spamcat.sqlite3');
is($conf{default_count}, 10);
is_deeply($conf{domains},
['spamcat.example.com', 'spamcat2.example.com', 'spamcat3']);
|
