diff options
-rw-r--r-- | elisp/geiser-syntax.el | 6 |
1 files changed, 5 insertions, 1 deletions
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))) |