From f0092767b46f7b0bc47053dd358d8afb8d78a9a7 Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Thu, 7 Sep 2006 15:21:56 +0000
Subject: [PATCH] Typo fix in #ifdef

p4raw-id: //depot/perl@28804
---
 toke.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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;
-- 
2.7.4