Re: [PATCH] pp_ctl.c:pp_require

From: "Newton, Philip" <Philip.Newton@datenrevision.de>
Message-ID: <C9A98F2128EDD411B0920008C7B337A13DCC77@hamsem01.de.gedas.vwg>

p4raw-id: //depot/perl@16158

diff --git a/pp_ctl.c b/pp_ctl.c
index 8e16629..b2499eb 100644 (file)
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -2948,8 +2948,8 @@ PP(pp_require)
                    DIE(aTHX_ "Perl v%"UVuf".%"UVuf".%"UVuf" required"
                        " (did you mean v%"UVuf".%03"UVuf"?)--"
                        "this is only v%d.%d.%d, stopped",
-                       rev, ver, sver, PERL_REVISION, PERL_VERSION,
-                       PERL_SUBVERSION, rev, ver/100);
+                       rev, ver, sver, rev, ver/100,
+                       PERL_REVISION, PERL_VERSION, PERL_SUBVERSION);
                }
                else {
                    DIE(aTHX_ "Perl v%"UVuf".%"UVuf".%"UVuf" required--"