branch: elpa/forth-mode
commit 8d1d8ea7957832986d9078145bd5a7a071dfc0db
Author: Helmut Eller <[email protected]>
Commit: Helmut Eller <[email protected]>
Re-add test for 'syntax-propertize-function.
It was somehow lost with last commit.
---
test/tests.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/test/tests.el b/test/tests.el
index a8f978247a..dc680db763 100644
--- a/test/tests.el
+++ b/test/tests.el
@@ -24,9 +24,10 @@
,@body))
(defun forth-assert-face (content pos face)
- (forth-with-temp-buffer content
- (font-lock-fontify-buffer)
- (should (eq face (get-text-property pos 'face)))))
+ (when (boundp 'syntax-propertize-function)
+ (forth-with-temp-buffer content
+ (font-lock-fontify-buffer)
+ (should (eq face (get-text-property pos 'face))))))
(defun forth-strip-| (string)
(replace-regexp-in-string "^[ \t]*|" "" (substring-no-properties string)))
