summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2008-12-16 13:57:38 +0000
committerNicholas Clark <nick@ccl4.org>2008-12-16 13:57:38 +0000
commit6c56a02d9de4b4011151bf6a7f01db8b90ff4862 (patch)
treee5c5c729e9d0f471d0122b2c6454ed67020c0e02
parentcb851209bf3671158183f80a60fff5e1b9a7b95c (diff)
downloadperl-6c56a02d9de4b4011151bf6a7f01db8b90ff4862.tar.gz
Thank you for a thank you, not thank you for a bug report.
p4raw-id: //depot/perl@35120
-rw-r--r--utils/perlbug.PL6
1 files changed, 5 insertions, 1 deletions
diff --git a/utils/perlbug.PL b/utils/perlbug.PL
index d0263f39aa..c86478a5e7 100644
--- a/utils/perlbug.PL
+++ b/utils/perlbug.PL
@@ -194,7 +194,11 @@ if ($outfile) {
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;