From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Thu, 7 Sep 2006 15:21:56 +0000 (+0000)
Subject: Typo fix in #ifdef
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f0092767b46f7b0bc47053dd358d8afb8d78a9a7;p=p5sagit%2Fp5-mst-13.2.git

Typo fix in #ifdef

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

diff --git a/toke.c b/toke.c
index a1bd2c4..3fec508 100644
--- a/toke.c
+++ b/toke.c
@@ -2587,7 +2587,7 @@ S_intuit_method(pTHX_ char *start, GV *gv, CV *cv)
 	len = start - SvPVX(PL_linestr);
 #endif
 	s = PEEKSPACE(s);
-#ifdef PERLMAD
+#ifdef PERL_MAD
 	start = SvPVX(PL_linestr) + len;
 #endif
 	PL_bufptr = start;