Merge pull request #527 from mallt/fix-test-443-emacs-27

Fix #524: Change test for issue 443 to handle changed comment delimiter in emacs 27

Author: zonuexe

php-mode-test.el

@@ -930,7 +930,8 @@ style from Drupal."
 (ert-deftest php-mode-test-issue-443 ()
   "This case allows you to color things that are not authentic PHP tags
 (ex.  `<?xml', `<?hh') as false positives."
-  (with-php-mode-test ("issue-443.php" :faces t)))
+  (with-php-mode-test ("issue-443.php"
+                       :faces (if (version<= "27" emacs-version) ".27.faces" t))))
 
 (ert-deftest php-mode-test-type-hints ()
   "Test highlighting of type hints and return types."

tests/issue-443.php.27.faces

@@ -0,0 +1,79 @@
+;; -*- mode: emacs-lisp -*-
+(("<?php" . php-php-tag)
+ (" ")
+ ("declare" . php-keyword)
+ ("(")
+ ("strict_types" . php-keyword)
+ ("=1); ")
+ ("?>" . php-php-tag)
+ ("\n")
+ ("/** GitHub Issue: " . font-lock-doc-face)
+ ("https://github.com/emacs-php/php-mode/issues/443" link font-lock-doc-face)
+ (" */" . font-lock-doc-face)
+ ("\n")
+ ("<?xml" . php-php-tag)
+ (" version=")
+ ("\"1.0\"" . php-string)
+ (" ")
+ ("encoding" . php-keyword)
+ ("=")
+ ("\"UTF-8\"" . php-string)
+ ("?>" . php-php-tag)
+ ("\n")
+ ("<?hh" . php-php-tag)
+ (" ")
+ ("echo" . php-keyword)
+ (" ")
+ ("\"Hack open tag\"" . php-string)
+ (" ")
+ ("?>" . php-php-tag)
+ ("\n")
+ ("<?" . php-php-tag)
+ (" ")
+ ("echo" . php-keyword)
+ (" ")
+ ("\"obsolete short open tag\"" . php-string)
+ (" ")
+ ("?>" . php-php-tag)
+ ("\n")
+ ("<%" . php-php-tag)
+ (" ")
+ ("echo" . php-keyword)
+ (" ")
+ ("\"obsolete ASP tags\"" . php-string)
+ (" ")
+ ("%>" . php-php-tag)
+ ("\n")
+ ("<?=" . php-php-tag)
+ (" ")
+ ("\"foo\"" . php-string)
+ (" ")
+ ("?>" . php-php-tag)
+ ("\n")
+ ("<?=" . php-php-tag)
+ (" 1 + 1 ")
+ ("?>" . php-php-tag)
+ ("\n")
+ ("<?php" . php-php-tag)
+ (" ")
+ ("/* " . font-lock-comment-delimiter-face)
+ ("Foo" . font-lock-comment-face)
+ (" */" . font-lock-comment-delimiter-face)
+ (" ")
+ ("echo" . php-keyword)
+ (" ")
+ ("\"Bar\"" . php-string)
+ ("; ")
+ ("?>" . php-php-tag)
+ ("\n")
+ ("<?php" . php-php-tag)
+ ("/* " . font-lock-comment-delimiter-face)
+ ("Foo" . font-lock-comment-face)
+ (" */" . font-lock-comment-delimiter-face)
+ (" ")
+ ("echo" . php-keyword)
+ (" ")
+ ("\"Bar\"" . php-string)
+ ("; ")
+ ("?>" . php-php-tag)
+ ("\n"))