summaryrefslogtreecommitdiff
path: root/utils/perlbug.PL
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
commit4dbf56a0722142a15f005769a3a0f7cc57b2c544 (patch)
treee5c5c729e9d0f471d0122b2c6454ed67020c0e02 /utils/perlbug.PL
parent74ae847926f0d2fb3e4611242365c461066cf4df (diff)
downloadperl-4dbf56a0722142a15f005769a3a0f7cc57b2c544.tar.gz
Thank you for a thank you, not thank you for a bug report.
p4raw-id: //depot/perl@35120
Diffstat (limited to 'utils/perlbug.PL')
-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;