From: Gurusamy Sarathy <gsar@cpan.org>
Date: Sun, 5 Mar 2000 17:46:18 +0000 (+0000)
Subject: perlbug tweak to grok local_patches better
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5963b987d451051651e0ba84aeab7c2129af761e;p=p5sagit%2Fp5-mst-13.2.git

perlbug tweak to grok local_patches better

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

diff --git a/utils/perlbug.PL b/utils/perlbug.PL
index f46564e..f6280d2 100644
--- a/utils/perlbug.PL
+++ b/utils/perlbug.PL
@@ -37,8 +37,8 @@ my @patches;
 while (<PATCH_LEVEL>) {
     last if /^\s*}/;
     chomp;
-    s/^\s+,?"?//;
-    s/"?,?$//;
+    s/^\s+,?\s*"?//;
+    s/"?\s*,?$//;
     s/(['\\])/\\$1/g;
     push @patches, $_ unless $_ eq 'NULL';
 }