This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Normalize formatting of "Ambiguous call resolved as CORE::%s(), qualify as such or...
authorJames Mastros <james@mastros.biz>
Wed, 2 Jun 2010 16:22:36 +0000 (17:22 +0100)
committerRafael Garcia-Suarez <rgs@consttype.org>
Mon, 26 Jul 2010 08:13:01 +0000 (10:13 +0200)
t/porting/diag.t
toke.c

index 7c05172..b9517b6 100644 (file)
@@ -223,7 +223,6 @@ sub check_file {
 # Lists all missing things as of the inaguration of this script, so we
 # don't have to go from "meh" to perfect all at once.
 __DATA__
-Ambiguous call resolved as CORE::%s(), %s
 Ambiguous use of %c resolved as operator %c
 Ambiguous use of %c{%s} resolved to %c%s
 Ambiguous use of %c{%s%s} resolved to %c%s%s
diff --git a/toke.c b/toke.c
index 75fb327..1e7cdb5 100644 (file)
--- a/toke.c
+++ b/toke.c
@@ -6204,8 +6204,9 @@ Perl_yylex(pTHX)
                gvp = 0;
                if (hgv && tmp != KEY_x && tmp != KEY_CORE)     /* never ambiguous */
                    Perl_ck_warner(aTHX_ packWARN(WARN_AMBIGUOUS),
-                                  "Ambiguous call resolved as CORE::%s(), %s",
-                                  GvENAME(hgv), "qualify as such or use &");
+                                  "Ambiguous call resolved as CORE::%s(), "
+                                  "qualify as such or use &",
+                                  GvENAME(hgv));
            }
        }