From: Glenn Morris <rgm@gnu.org>
Date: Tue, 12 May 2015 06:51:58 +0000 (-0700)
Subject: * lisp/url/url-handlers.el (url-file-name-completion)
X-Git-Tag: emacs-25.0.90~2113
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=20cca4738aae1e90c6ca7770135fc2b30c08e0f3;p=emacs.git

* lisp/url/url-handlers.el (url-file-name-completion)

(url-file-name-all-completions): Silence compiler.
---

diff --git a/lisp/url/url-handlers.el b/lisp/url/url-handlers.el
index ff3eafd19da..001a7831ad5 100644
--- a/lisp/url/url-handlers.el
+++ b/lisp/url/url-handlers.el
@@ -344,14 +344,14 @@ They count bytes from the beginning of the body."
 
 (put 'insert-file-contents 'url-file-handlers 'url-insert-file-contents)
 
-(defun url-file-name-completion (url directory &optional predicate)
+(defun url-file-name-completion (url _directory &optional _predicate)
   ;; Even if it's not implemented, it's not an error to ask for completion,
   ;; in case it's available (bug#14806).
   ;; (error "Unimplemented")
   url)
 (put 'file-name-completion 'url-file-handlers 'url-file-name-completion)
 
-(defun url-file-name-all-completions (file directory)
+(defun url-file-name-all-completions (_file _directory)
   ;; Even if it's not implemented, it's not an error to ask for completion,
   ;; in case it's available (bug#14806).
   ;; (error "Unimplemented")