emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 3a4cb1f 05/67: Add compatibility alias for `font-lock-ensu


From: Oleh Krehel
Subject: [elpa] master 3a4cb1f 05/67: Add compatibility alias for `font-lock-ensure'
Date: Sun, 22 Mar 2015 17:33:49 +0000

branch: master
commit 3a4cb1f6c32445eb63d598e09e8576c13206db65
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    Add compatibility alias for `font-lock-ensure'
    
    * swiper.el (swiper-font-lock-ensure): Add.
    
    Fixes #1.
---
 swiper.el |    7 ++++++-
 1 files changed, 6 insertions(+), 1 deletions(-)

diff --git a/swiper.el b/swiper.el
index caf5818..8b50f78 100644
--- a/swiper.el
+++ b/swiper.el
@@ -70,6 +70,11 @@
 (defvar swiper--buffer nil
   "Store current buffer.")
 
+(defalias 'swiper-font-lock-ensure
+    (if (fboundp 'font-lock-ensure)
+        'font-lock-ensure
+      'font-lock-fontify-buffer))
+
 (defun swiper--candidates ()
   "Return a list of this buffer lines."
   (let* ((line-width (1+ (floor (log (count-lines
@@ -80,7 +85,7 @@
          candidates)
     (save-excursion
       (goto-char (point-min))
-      (font-lock-ensure)
+      (swiper-font-lock-ensure)
       (while (< (point) (point-max))
         (push (format fspec
                       (incf line-number)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]