diff options
author | Eric Wong <e@yhbt.net> | 2020-07-07 20:37:35 +0000 |
---|---|---|
committer | Eric Wong <e@yhbt.net> | 2020-07-10 11:27:06 +0000 |
commit | 7f454bace0442cd5ce22068ec1e098e964d82778 (patch) | |
tree | 1a3ba0012aa75a3a8a427a275c2b46ffce60813b /t/hval.t | |
parent | bc18c05b1681acc9a468b298c34b12ca4db3e5bb (diff) | |
download | public-inbox-7f454bace0442cd5ce22068ec1e098e964d82778.tar.gz |
Returning an empty string for a filename makes no sense, so instead return `undef' so the caller can setup a fallback using the "//" operator. This fixes uninitialized variable warnings because split() on an empty string returns `undef', which caused to_filename to warn on s// and tr// ops.
Diffstat (limited to 't/hval.t')
-rw-r--r-- | t/hval.t | 8 |
1 files changed, 5 insertions, 3 deletions
@@ -47,15 +47,17 @@ EOF is($html, $exp, 'only obfuscated relevant addresses'); -is('foo-bar', PublicInbox::Hval::to_filename('foo bar '), +is(PublicInbox::Hval::to_filename('foo bar '), 'foo-bar', 'to_filename has no trailing -'); -is('foo-bar', PublicInbox::Hval::to_filename("foo bar\nanother line\n"), +is(PublicInbox::Hval::to_filename("foo bar\nanother line\n"), 'foo-bar', 'to_filename has no repeated -, and nothing past LF'); -is('foo.bar', PublicInbox::Hval::to_filename("foo....bar"), +is(PublicInbox::Hval::to_filename("foo....bar"), 'foo.bar', 'to_filename squeezes -'); +is(PublicInbox::Hval::to_filename(''), undef, 'empty string returns undef'); + my $s = "\0\x07\n"; PublicInbox::Hval::src_escape($s); is($s, "\\0\\a\n", 'src_escape works as intended'); |