[elpa] master f754835 47/67: swiper.el: Silence a few compilation warnings

[Oleh Krehel]

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

    swiper.el: Silence a few compilation warnings
---
 swiper.el |   13 +++++++++++--
 1 files changed, 11 insertions(+), 2 deletions(-)

diff --git a/swiper.el b/swiper.el
index e00aa1a..fc5dae2 100644
--- a/swiper.el
+++ b/swiper.el
@@ -176,6 +176,15 @@ When non-nil, INITIAL-INPUT is the initial search pattern."
           (goto-char swiper--opoint)
         (swiper--action res ivy-text)))))
 
+(defvar helm-candidate-number-limit)
+(defvar helm-display-function)
+(defvar helm-map)
+(defvar helm-input)
+(declare-function helm "ext:helm")
+(declare-function helm-persistent-action-display-window "ext:helm")
+(declare-function helm-window "ext:helm")
+(declare-function helm-next-line "ext:helm")
+
 (defun swiper--helm (&optional initial-input)
   "`isearch' with an overview using `helm'.
 When non-nil, INITIAL-INPUT is the initial search pattern."
@@ -268,7 +277,7 @@ When non-nil, INITIAL-INPUT is the initial search pattern."
                 0)))
     (with-selected-window swiper--window
       (goto-char (point-min))
-      (when (plusp num)
+      (when (cl-plusp num)
         (goto-char (point-min))
         (forward-line (1- num))
         (isearch-range-invisible (line-beginning-position)
@@ -374,7 +383,7 @@ When non-nil, INITIAL-INPUT is the initial search pattern."
 
 (defun swiper--reanchor ()
   "Move to a valid match closest to `swiper--anchor'."
-  (with-helm-window
+  (with-selected-window (helm-window)
     (goto-char (point-min))
     (if (re-search-forward (format "^%d " swiper--anchor) nil t)
         nil