diff options
| author | Glenn Morris <rgm@gnu.org> | 2015-05-11 23:51:58 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2015-05-11 23:51:58 -0700 |
| commit | 20cca4738aae1e90c6ca7770135fc2b30c08e0f3 (patch) | |
| tree | 22e955d772726deb0a644a828c82aab74b364326 /lisp/url/url-handlers.el | |
| parent | f2941a78d2383f00ba3f7a48076ea0586b5abec6 (diff) | |
| download | emacs-20cca4738aae1e90c6ca7770135fc2b30c08e0f3.tar.gz | |
* lisp/url/url-handlers.el (url-file-name-completion)
(url-file-name-all-completions): Silence compiler.
Diffstat (limited to 'lisp/url/url-handlers.el')
| -rw-r--r-- | 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 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") |