[prev in list] [next in list] [prev in thread] [next in thread] 

List:       perl5-changes
Subject:    Change 35120: Thank you for a thank you, not thank you for a bug report.
From:       Nicholas Clark <nwc10+p5p4 () colon ! colondot ! net>
Date:       2008-12-16 14:00:01
Message-ID: 20081216140001.C520E1402E () mx ! activestate ! com
[Download RAW message or body]

Change 35120 by nicholas@nicholas-saigo on 2008/12/16 13:57:38

	Thank you for a thank you, not thank you for a bug report.

Affected files ...

... //depot/perl/utils/perlbug.PL#60 edit

Differences ...

==== //depot/perl/utils/perlbug.PL#60 (text) ====
Index: perl/utils/perlbug.PL
--- perl/utils/perlbug.PL#59~34824~	2008-11-12 06:50:14.000000000 -0800
+++ perl/utils/perlbug.PL	2008-12-16 05:57:38.000000000 -0800
@@ -194,7 +194,11 @@
     save_message_to_disk($outfile);
 } else {
     Send();
-    print "\nThank you for taking the time to file a bug report!\n\n";
+    if ($thanks) {
+	print "\nThank you for taking the time to send a thank-you message!\n\n";
+    } else {
+	print "\nThank you for taking the time to file a bug report!\n\n";
+    }
 }
 
 exit;
End of Patch.
[prev in list] [next in list] [prev in thread] [next in thread]