Skip to content

Commit

Permalink
[io grant] Change \0 roundtrip test to \t roundtrip test
Browse files Browse the repository at this point in the history
NUL bytes aren't allowed in paths, so this test is in direct
contradiction with the security bug I'm trying to fix.

Since it's trying to test roundtrippage of whitespace, change it
to use use \t instead of \0.

https://irclog.perlgeek.de/perl6-dev/2017-04-10#i_14405645
  • Loading branch information
zoffixznet committed Apr 10, 2017
1 parent 39cff7b commit 8f73ad8
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions S32-io/io-path.t
Original file line number Diff line number Diff line change
Expand Up @@ -52,8 +52,8 @@ isa-ok $path.IO, IO::Path, 'IO::Path.IO returns IO::Path';
{
my $perl = "/foo|\\bar".IO.perl;
is $perl.EVAL.perl, $perl, "does $perl roundtrip?";
my $nul = "/foo\0bar".IO.perl;
is $nul.EVAL.perl, $nul, "does $nul roundtrip?";
my $tab = "/foo\tbar".IO.perl;
is $tab.EVAL.perl, $tab, "does $tab roundtrip?";
}

# RT #127989
Expand Down

0 comments on commit 8f73ad8

Please sign in to comment.