[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 20cca47: * lisp/url/url-handlers.el (url-file-name-
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] master 20cca47: * lisp/url/url-handlers.el (url-file-name-completion) |
Date: |
Tue, 12 May 2015 06:52:09 +0000 |
branch: master
commit 20cca4738aae1e90c6ca7770135fc2b30c08e0f3
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>
* lisp/url/url-handlers.el (url-file-name-completion)
(url-file-name-all-completions): Silence compiler.
---
lisp/url/url-handlers.el | 4 ++--
1 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/url/url-handlers.el b/lisp/url/url-handlers.el
index ff3eafd..001a783 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")
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 20cca47: * lisp/url/url-handlers.el (url-file-name-completion),
Glenn Morris <=