From f03aef051fa2e50249e8ba218234325ac3eed89b Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Mon, 15 Jul 2013 11:13:48 +0200 Subject: [PATCH] Remove a duplicate test separator "########\n" line from the pp_sys tests. The existing parser using split includes the second "########\n" as part of the extracted test program, which the Perl interpreter treats as a comment line. The parser refactoring in the next commit no longer adds the line to the extracted test program, causing the line numbers for the warnings to differ by one. The extra "########\n" was added as part of commit c521cf7c8af1697e in Dec 2010, along with the test program which follows it, and the (now) incorrect line number expectations. --- t/lib/warnings/pp_sys | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/t/lib/warnings/pp_sys b/t/lib/warnings/pp_sys index f0a5627..2e81916 100644 --- a/t/lib/warnings/pp_sys +++ b/t/lib/warnings/pp_sys @@ -154,7 +154,6 @@ write() on closed filehandle STDIN at - line 8. write() on closed filehandle STDIN at - line 11. (Are you trying to call write() on dirhandle STDIN?) ######## -######## # pp_sys.c [pp_leavewrite] use warnings 'unopened'; format STDIN = @@ -178,8 +177,8 @@ opendir FOO, "."; write STDIN; write FOO; EXPECT -write() on unopened filehandle FOO at - line 10. -write() on unopened filehandle FOO at - line 15. +write() on unopened filehandle FOO at - line 9. +write() on unopened filehandle FOO at - line 14. (Are you trying to call write() on dirhandle FOO?) ######## # pp_sys.c [pp_leavewrite] -- 2.7.4