From 733ea7a4ed1f527b70764a52fe865926d90f5177 Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Tue, 13 Oct 2015 20:47:38 +0200 Subject: Oops: font-lock-ensure is from the future Should fix #105 --- elisp/geiser-syntax.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'elisp') diff --git a/elisp/geiser-syntax.el b/elisp/geiser-syntax.el index 8e06339..022c4a0 100644 --- a/elisp/geiser-syntax.el +++ b/elisp/geiser-syntax.el @@ -481,7 +481,11 @@ implementation-specific entries for font-lock-keywords.") (set-buffer (geiser-syntax--font-lock-buffer)) (erase-buffer) (insert str) - (let ((font-lock-verbose nil)) (font-lock-ensure)) + (let ((font-lock-verbose nil)) + (if (fboundp 'font-lock-ensure) + (font-lock-ensure) + (with-no-warnings + (font-lock-fontify-buffer)))) (buffer-string))) -- cgit v1.2.3