From 6ac5e9b91adf56444c756d04c84fe7c503b4d46c Mon Sep 17 00:00:00 2001
From: Father Chrysostomos <sprout@cpan.org>
Date: Wed, 29 Aug 2012 20:41:09 -0700
Subject: [PATCH] toke.c:scan_heredoc: Merge two adjacent #ifdefs

---
 toke.c | 2 --
 1 file changed, 2 deletions(-)

diff --git a/toke.c b/toke.c
index 24c532f..71ebd4f 100644
--- a/toke.c
+++ b/toke.c
@@ -9600,9 +9600,7 @@ S_scan_heredoc(pTHX_ register char *s)
 	else
 	    PL_thisstuff = newSVpvn(tstart, s - tstart);
     }
-#endif
 
-#ifdef PERL_MAD
     stuffstart = s - SvPVX(PL_linestr);
 #endif
 
-- 
2.7.4