diff options
| author | Yves Orton <demerphq@gmail.com> | 2005-12-23 21:06:52 +0100 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2005-12-27 14:10:20 +0000 |
| commit | ce5918c5d3196bf3677bfb7036754bffc30f8e0e (patch) | |
| tree | 10c21e9d56a3ee54641957ce2509a882539cb7f6 /ext/B | |
| parent | b8f04b1b779ce1dfdaee8f5444dc413afe3e9866 (diff) | |
| download | perl-ce5918c5d3196bf3677bfb7036754bffc30f8e0e.tar.gz | |
[patch] ext/b/t/lint.t fails on win32
Message-ID: <9b18b3110512231106k7ad395bfp8a0c05cd0f87fc61@mail.gmail.com>
p4raw-id: //depot/perl@26501
Diffstat (limited to 'ext/B')
| -rw-r--r-- | ext/B/t/lint.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/B/t/lint.t b/ext/B/t/lint.t index 621649ebc3..d5ee215464 100644 --- a/ext/B/t/lint.t +++ b/ext/B/t/lint.t @@ -50,7 +50,7 @@ RESULT { my $res = runperl( switches => [ "-MB::Lint" ], - prog => "BEGIN{B::Lint->register_plugin(X=>[q[x]])};use O(qw[Lint x]);sub X::match{warn q[X ok.\n]};dummy()", + prog => 'BEGIN{B::Lint->register_plugin(X=>[q[x]])};use O(qw[Lint x]);sub X::match{warn qq[X ok.\n]};dummy()', stderr => 1, ); like( $res, qr/X ok\./, 'Lint plugin' ); |