perlbug bug - shows dates reversed

To: perlbug@perl.com
Message-Id: <199812240208.SAA27616@membrane.ssd.hal.com>

p4raw-id: //depot/cfgperl@2504

diff --git a/utils/perlbug.PL b/utils/perlbug.PL
index 589e7e6..842ff74 100644 (file)
--- a/utils/perlbug.PL
+++ b/utils/perlbug.PL
@@ -495,8 +495,8 @@ sub Dump {
     local(*OUT) = @_;
 
     print REP "\n---\n";
-    print REP "This perlbug was built using Perl $config_tag1\n",
-           "It is being executed now by  Perl $config_tag2.\n\n"
+    print REP "This perlbug was built using Perl $config_tag2\n",
+           "It is being executed now by  Perl $config_tag1.\n\n"
        if $config_tag2 ne $config_tag1;
 
     print OUT <<EOF;