[elpa] master 3c8daba 19/90: Fixup compilation warnings

[Oleh Krehel]

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

    Fixup compilation warnings
---
 counsel.el |   11 +++++++----
 ivy.el     |    1 +
 swiper.el  |    1 +
 3 files changed, 9 insertions(+), 4 deletions(-)

diff --git a/counsel.el b/counsel.el
index 6be445f..174a1b9 100644
--- a/counsel.el
+++ b/counsel.el
@@ -269,7 +269,10 @@
 
 (defcustom counsel-find-file-at-point nil
   "When non-nil, add file-at-point to the list of candidates."
-  :type 'boolean)
+  :type 'boolean
+  :group 'ivy)
+
+(declare-function ffap-guesser "ffap")
 
 (defun counsel-find-file ()
   "Forward to `find-file'."
@@ -286,7 +289,8 @@
 (defcustom counsel-find-file-ignore-regexp "\\(?:\\`[#.]\\)\\|\\(?:[#~]\\'\\)"
   "A regexp of files to ignore while in `counsel-find-file'.
 These files are un-ignored if `ivy-text' matches them.
-The common way to show all files is to start `ivy-text' with a dot.")
+The common way to show all files is to start `ivy-text' with a dot."
+  :group 'ivy)
 
 (defun counsel--find-file-matcher (regexp candidates)
   "Return REGEXP-matching CANDIDATES.
@@ -336,8 +340,7 @@ Skip some dotfiles unless `ivy-text' requires them."
 (defun counsel-locate ()
   "Call locate."
   (interactive)
-  (let* ((ivy--dynamic-function 'counsel-locate-function)
-         (val (ivy-read "pattern: " 'counsel-locate-function)))
+  (let ((val (ivy-read "pattern: " 'counsel-locate-function)))
     (when val
       (find-file val))))
 
diff --git a/ivy.el b/ivy.el
index 15ced91..2115555 100644
--- a/ivy.el
+++ b/ivy.el
@@ -261,6 +261,7 @@ Is is a cons cell, related to 
`tramp-get-completion-function'."
       domain)))
 
 (declare-function tramp-get-completion-function "tramp")
+(declare-function Info-find-node "info")
 
 (defun ivy-alt-done (&optional arg)
   "Exit the minibuffer with the selected candidate.
diff --git a/swiper.el b/swiper.el
index c27da2e..8312852 100644
--- a/swiper.el
+++ b/swiper.el
@@ -103,6 +103,7 @@
       (exit-minibuffer))))
 
 (defvar avy-background)
+(defvar avy-all-windows)
 (declare-function avy--regex-candidates "ext:avy")
 (declare-function avy--process "ext:avy")
 (declare-function avy--overlay-post "ext:avy")