From: Gurusamy Sarathy <gsar@cpan.org>
Date: Wed, 22 Mar 2000 14:07:27 +0000 (+0000)
Subject: perlbug -ok shouldn't prompt (from Paul Moore
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=158f8ee5d0a06552c1de9eceef93cfd383751c07;p=p5sagit%2Fp5-mst-13.2.git

perlbug -ok shouldn't prompt (from Paul Moore
<Paul.Moore@uk.origin-it.com>)

p4raw-id: //depot/perl@5869
---

diff --git a/utils/perlbug.PL b/utils/perlbug.PL
index f6d3dc0..208da36 100644
--- a/utils/perlbug.PL
+++ b/utils/perlbug.PL
@@ -276,6 +276,8 @@ EOF
 	    $subject = ($::opt_n ? 'Not ' : '')
 		    . "OK: perl $perl_version ${patch_tags}on"
 		    ." $::Config{'archname'} $::Config{'osvers'} $subject";
+	    $category = "install";
+	    $severity = "none";
 	    $ok = 1;
 	} else {
 	    Help();