diff options
author | Eric Wong <e@80x24.org> | 2019-01-18 19:40:07 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2019-01-18 19:41:44 +0000 |
commit | 743ac758eb34f18c7e2544cbc48299662074b1ef (patch) | |
tree | 5cf35c64dbd384c325f6030c1f1eac0d64e5a43f /t | |
parent | d66aa534a4a7506cfc5cfab49d1e09f8db8be3dd (diff) | |
download | public-inbox-743ac758eb34f18c7e2544cbc48299662074b1ef.tar.gz |
Older versions of Perl (tested 5.14.2 on Debian wheezy(*), reported by Konstantin on Perl 5.16.3) considered the result of concatenating two string literals to be a constant value. (*) not that other stuff works on wheezy, but t/git.t should. Reported-by: Konstantin Ryabitsev <konstantin@linuxfoundation.org>
Diffstat (limited to 't')
-rw-r--r-- | t/git.t | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -145,7 +145,8 @@ if ('alternates reloaded') { } use_ok 'PublicInbox::Git', qw(git_unquote); -is("foo\nbar", git_unquote('"foo\\nbar"'.''), 'unquoted newline'); -is("Eléanor", git_unquote('"El\\303\\251anor"'.''), 'unquoted octal'); +my $s; +is("foo\nbar", git_unquote($s = '"foo\\nbar"'), 'unquoted newline'); +is("Eléanor", git_unquote($s = '"El\\303\\251anor"'), 'unquoted octal'); done_testing(); |