diff options
author | Ævar Arnfjörð Bjarmason <avar@cpan.org> | 2014-06-21 21:13:43 +0000 |
---|---|---|
committer | Ævar Arnfjörð Bjarmason <avar@cpan.org> | 2014-06-21 21:20:07 +0000 |
commit | 3101bb05368cd2d7eedfcfb9ad57c2f47cf5b7a2 (patch) | |
tree | 58cfad24053dbca3853feb21a620f6524c714565 | |
parent | d3ae482b1fbb8a275f4933ce8f7d28aed9e6f166 (diff) | |
download | perl-3101bb05368cd2d7eedfcfb9ad57c2f47cf5b7a2.tar.gz |
Fix black Win32 smoke broken by my v5.21.1-11-g4077a6b (yet again)
I was being silly with my test improvements in v5.21.1-12-g826af13 and
v5.21.1-13-g43d7f0d. I haven't been able to test this on Win32 where
it's breaking, but if the sprintf format isn't recognized there we're
going to get a warning about a *redundant* argument in printf, not a
missing one, i.e. just like this:
$ ./perl -Ilib -we 'printf "%æ\n", "str"'
Invalid conversion in printf: "%\303" at -e line 1.
Redundant argument in printf at -e line 1.
%s
So fix that, I'm certain this will fix the black smoke on Win32, if not
I have no idea what's going on.
-rw-r--r-- | t/op/sprintf2.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/sprintf2.t b/t/op/sprintf2.t index 28197c1e5b..6fd0bde072 100644 --- a/t/op/sprintf2.t +++ b/t/op/sprintf2.t @@ -307,7 +307,7 @@ for my $t (@tests) { } else { is($sprintf_got, $fmt, "quad unsupported: $fmt -> $fmt"); like($w, qr/Invalid conversion in sprintf: "$fmt"/, "got warning about invalid conversion from fmt : $fmt"); - like($w, qr/Missing argument in sprintf/, "got warning about missing argument in sprintf from fmt : $fmt"); + like($w, qr/Redundant argument in sprintf/, "got warning about redundant argument in sprintf from fmt : $fmt"); } } } |