From 053bb685ab7cd9a6026882a53b5632a4f4ad46bc Mon Sep 17 00:00:00 2001
From: acli <acli>
Date: Wed, 18 Feb 2004 06:56:19 +0000
Subject: [PATCH] Warn against Apache #include directive

---
 misc/translator/TmplTokenizer.pm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/misc/translator/TmplTokenizer.pm b/misc/translator/TmplTokenizer.pm
index 4a5e5cf729..bb37eaa10e 100644
--- a/misc/translator/TmplTokenizer.pm
+++ b/misc/translator/TmplTokenizer.pm
@@ -346,6 +346,9 @@ sub _next_token_internal {
 	} elsif ($it =~ /^<!/) {
 	    $kind = TmplTokenType::DECL;
 	    $kind = TmplTokenType::COMMENT if $it =~ /^<!--(?:(?!-->).)*-->/;
+	    if ($kind == TmplTokenType::COMMENT && $it =~ /^<!--\s*#include/s) {
+		warn_normal "Apache #include directive found instead of HTML::Template directive <TMPL_INCLUDE>", $this->line_number_start;
+	    }
 	} elsif ($it =~ /^<\?/) {
 	    $kind = TmplTokenType::PI;
 	}
-- 
2.39.5