Mercurial > hg > nginx-tests

comparison lib/Test/Nginx/SMTP.pm @ 243:de7338227832

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: removed trailing spaces.
author Homutov Vladimir <vl@nginx.com>
date Mon, 14 Jan 2013 16:57:50 +0400
parents 5137f27935b4
children 9d0a2fa47ac6
comparison
equal deleted inserted replaced
242:8f280348d76f 243:de7338227832
62 my ($self, $regex, $name) = @_; 62 my ($self, $regex, $name) = @_;
63 Test::More->builder->like($self->read(), $regex, $name); 63 Test::More->builder->like($self->read(), $regex, $name);
64 } 64 }
65 65
66 sub ok { 66 sub ok {
67 my $self = shift; 67 my $self = shift;
68 Test::More->builder->like($self->read(), qr/^2\d\d /, @_); 68 Test::More->builder->like($self->read(), qr/^2\d\d /, @_);
69 } 69 }
70 70
71 sub authok { 71 sub authok {
72 my $self = shift; 72 my $self = shift;
73 Test::More->builder->like($self->read(), qr/^235 /, @_); 73 Test::More->builder->like($self->read(), qr/^235 /, @_);
74 } 74 }
75 75
76 ############################################################################### 76 ###############################################################################
77 77