From: Gisle Aas <gisle@activestate.com>
Date: Wed, 12 Nov 2008 14:50:14 +0000 (+0000)
Subject: Skip #ifdefs and other preprocessor lines when parsing the
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=3bcc0c4bdd9457f6924030e81994a3583d07a8cb;p=p5sagit%2Fp5-mst-13.2.git

Skip #ifdefs and other preprocessor lines when parsing the
local_patches section of patchlevel.h.

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

diff --git a/utils/perlbug.PL b/utils/perlbug.PL
index b75a677..d0263f3 100644
--- a/utils/perlbug.PL
+++ b/utils/perlbug.PL
@@ -40,6 +40,7 @@ if (! defined($_)) {
 my @patches;
 while (<PATCH_LEVEL>) {
     last if /^\s*}/;
+    next if /^\s*#/;  # preprocessor stuff
     chomp;
     s/^\s+,?\s*"?//;
     s/"?\s*,?$//;