diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Tie/File/t/09_gen_rs.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Tie/File/t/09_gen_rs.t b/lib/Tie/File/t/09_gen_rs.t index c1ef7400c8..43b7140a92 100644 --- a/lib/Tie/File/t/09_gen_rs.t +++ b/lib/Tie/File/t/09_gen_rs.t @@ -147,7 +147,7 @@ if (setup_badly_terminated_file(2)) { # There's special-case code to fix the final record when it is read normally. # But the $#a forces it to be read from the cache, which skips the # termination. -$badrec = "world\nhello"; +$badrec = "world${RECSEP}hello"; if (setup_badly_terminated_file(1)) { tie(@a, "Tie::File", $file, mode => 0, recsep => $RECSEP) or die "Couldn't tie file: $!"; |