* packages/markchars/markchars.el (markchars-mode): Use font-lock-flush

when available.

diff --git a/packages/markchars/markchars.el b/packages/markchars/markchars.el
index 2f0e7b789e00103167a7a0c5044d2e4ecc4e1ca3..974456a4442e6a9e01013e238575c307e68774c9 100644 (file)
--- a/packages/markchars/markchars.el
+++ b/packages/markchars/markchars.el
@@ -191,7 +191,8 @@ The default is to mark nonascii chars with a magenta underline."
           (add-to-list props 'markchars))
         (font-lock-add-keywords nil markchars-used-keywords))
     (font-lock-remove-keywords nil markchars-used-keywords))
-  (font-lock-fontify-buffer))
+  (if (fboundp 'font-lock-flush)
+      (font-lock-flush) (font-lock-fontify-buffer)))
 
 ;;;###autoload
 (define-globalized-minor-mode markchars-global-mode markchars-mode