From 88a5f1111b85d8a1dd17cabb7f90b019a27f8464 Mon Sep 17 00:00:00 2001
From: Dylan William Hardison <dylan@hardison.net>
Date: Mon, 10 Apr 2017 12:19:34 -0400
Subject: Bug 1355127 - rewrite field-descs.none.tmpl in perl

---
 t/008filter.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 't')

diff --git a/t/008filter.t b/t/008filter.t
index b8d05af8a..cae1e6880 100644
--- a/t/008filter.t
+++ b/t/008filter.t
@@ -164,7 +164,7 @@ sub directive_ok {
                                  BLOCK|USE|ELSE|NEXT|LAST|DEFAULT|FLUSH|
                                  ELSIF|SET|SWITCH|CASE|WHILE|RETURN|STOP|
                                  TRY|CATCH|FINAL|THROW|CLEAR|MACRO|FILTER|
-                                 CALL|WRAPPER)/x;
+                                 RAWPERL|PERL|CALL|WRAPPER)/x;
 
     # ? :
     if ($directive =~ /.+\?(.+):(.+)/) {
-- 
cgit v1.2.3-24-g4f1b