X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Fhval.t;h=bfc9a856f50ba83886388f34e57ad1f3fa91ddbe;hb=6025d9881c00a0d4b538f06ce157eed416045e10;hp=a193c296649094cb67263017aa438495c9cbcf3a;hpb=603d9ebc517fcf89ab6d2e7845b118aa6b8e9069;p=public-inbox.git diff --git a/t/hval.t b/t/hval.t index a193c296..bfc9a856 100644 --- a/t/hval.t +++ b/t/hval.t @@ -43,5 +43,8 @@ is('foo-bar', PublicInbox::Hval::to_filename("foo bar\nanother line\n"), is('foo.bar', PublicInbox::Hval::to_filename("foo....bar"), 'to_filename squeezes -'); +my $s = "\0\x07\n"; +PublicInbox::Hval::src_escape($s); +is($s, "\\0\\a\n", 'src_escape works as intended'); done_testing();