From: Kay Röpke <kroepke@dolphin-services.de>
Date: Sat, 13 Oct 2001 20:33:55 +0000 (+0200)
Subject: (retracted by #12437)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4ff990baad4ec3c72dde22b1e5c26ce9d48e7c6a;p=p5sagit%2Fp5-mst-13.2.git

(retracted by #12437)
Subject: [PATCH lib/ExtUtils/MM_Unix.pm] MakeMaker tries to parse commented out $VERSION
Message-Id: <E15sTbe-0001nt-00@mrvdom04.kundenserver.de>

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

diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm
index e6c6766..7392012 100644
--- a/lib/ExtUtils/MM_Unix.pm
+++ b/lib/ExtUtils/MM_Unix.pm
@@ -2787,6 +2787,7 @@ sub parse_version {
 	next if $inpod || /^\s*#/;
 	chop;
 	# next unless /\$(([\w\:\']*)\bVERSION)\b.*\=/;
+	next if /^\s*?\#/;
 	next unless /([\$*])(([\w\:\']*)\bVERSION)\b.*\=/;
 	my $eval = qq{
 	    package ExtUtils::MakeMaker::_version;