[elpa] master 1099ebf 08/67: Use cl-lib macros instead of cl.el

[Oleh Krehel]

branch: master
commit 1099ebffdccc4e1037a2f90e5a11ba68300ef3ff
Author: Syohei YOSHIDA <address@hidden>
Commit: Syohei YOSHIDA <address@hidden>

    Use cl-lib macros instead of cl.el
---
 swiper.el |    8 ++++----
 1 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/swiper.el b/swiper.el
index a19e1f0..b4935c5 100644
--- a/swiper.el
+++ b/swiper.el
@@ -88,7 +88,7 @@
       (swiper-font-lock-ensure)
       (while (< (point) (point-max))
         (push (format fspec
-                      (incf line-number)
+                      (cl-incf line-number)
                       (buffer-substring
                        (line-beginning-position)
                        (line-end-position)))
@@ -167,7 +167,7 @@
                                                (match-end i)))
                         (face
                          (cond ((zerop swiper--subexps)
-                                (caddr swiper-faces))
+                                (cl-caddr swiper-faces))
                                ((zerop i)
                                 (car swiper-faces))
                                (t
@@ -176,7 +176,7 @@
                     (push overlay swiper--overlays)
                     (overlay-put overlay 'face face)
                     (overlay-put overlay 'priority i)
-                    (incf i))))))))))
+                    (cl-incf i))))))))))
   (when (/= (length helm-input) swiper--len)
     (setq swiper--len (length helm-input))
     (swiper--reanchor)))
@@ -196,7 +196,7 @@
           (when (< (setq d (abs (- n swiper--anchor))) min)
             (setq min d)
             (setq ln beg))
-          (incf beg)
+          (cl-incf beg)
           (forward-line 1))
         (goto-char (point-min))
         (when ln