byterazor/qpsmtpd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Less obtrusive addition of test hooks

Browse Source
This commit is contained in:
Jared Johnson 2014-12-17 18:37:21 -06:00
parent 63d423c896
commit 7d33c42d35
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
t/Test/Qpsmtpd/Plugin.pm
View File

@ -87,7 +87,7 @@ sub validate_password {
sub fake_config { sub fake_config {
my $self = shift; my $self = shift;
my $fake_config = {@_}; my $fake_config = {@_};
$self->qp->hooks->{config} = [ unshift @{ $self->qp->hooks->{config} ||= [] },
{ {
name => '___FakeHook___', name => '___FakeHook___',
code => sub { code => sub {
@ -95,8 +95,7 @@ sub fake_config {
return DECLINED if ! exists $fake_config->{$conf}; return DECLINED if ! exists $fake_config->{$conf};
return OK, $fake_config->{$conf}; return OK, $fake_config->{$conf};
}, },
}, };
];
} }
sub unfake_config { sub unfake_config {