diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2013-11-17 06:32:02 -0800 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2013-11-17 13:08:59 -0800 |
| commit | f77147f3838383051e02d75ea0cfc430287f477b (patch) | |
| tree | 0dc2bd37c8816fa139474ebf4f6fb0b511c93771 /t/porting | |
| parent | 0db6997dfe9bfa64c2d1e836b572c2bd002eb6d2 (diff) | |
| download | perl-f77147f3838383051e02d75ea0cfc430287f477b.tar.gz | |
diag.t: Support multiline perldiag entries better
I.e., don’t require a space before the newline.
Diffstat (limited to 't/porting')
| -rw-r--r-- | t/porting/diag.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/porting/diag.t b/t/porting/diag.t index 146d626586..bee1e4c44a 100644 --- a/t/porting/diag.t +++ b/t/porting/diag.t @@ -79,7 +79,7 @@ while (<$diagfh>) { last; } - $cur_entry .= $_; + $cur_entry =~ s/ ?\z/ $_/; } $cur_entry =~ s/\n/ /gs; # Fix multi-line headers if they have \n's |