Remove reference to 'No such file or directory', as there's no guarantee
this is what $! will return when this code is called during testing.
This commit is contained in:
parent
4518ea3057
commit
7b3018c660
4
t/misc.t
4
t/misc.t
@ -10,14 +10,14 @@ ok(my ($smtpd, $conn) = Test::Qpsmtpd->new_conn(), "get new connection");
|
|||||||
{
|
{
|
||||||
my $fault;
|
my $fault;
|
||||||
stderr_like { $fault = $smtpd->fault }
|
stderr_like { $fault = $smtpd->fault }
|
||||||
qr/program fault - command not performed \(No such file or directory\)/,
|
qr/program fault - command not performed \(/,
|
||||||
'fault outputs proper warning to STDOUT';
|
'fault outputs proper warning to STDOUT';
|
||||||
is($fault->[0], 451, 'fault returns 451');
|
is($fault->[0], 451, 'fault returns 451');
|
||||||
};
|
};
|
||||||
{
|
{
|
||||||
my $fault;
|
my $fault;
|
||||||
stderr_like { $fault = $smtpd->fault('test message') }
|
stderr_like { $fault = $smtpd->fault('test message') }
|
||||||
qr/test message \(No such file or directory\)/,
|
qr/test message \(/,
|
||||||
'fault outputs proper custom warning to STDOUT';
|
'fault outputs proper custom warning to STDOUT';
|
||||||
is($fault->[1], 'Internal error - try again later - test message',
|
is($fault->[1], 'Internal error - try again later - test message',
|
||||||
'returns the input message');
|
'returns the input message');
|
||||||
|
Loading…
Reference in New Issue
Block a user