[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] trunk r113608: * lisp/url/url-handlers.el (url-file-name-c
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] trunk r113608: * lisp/url/url-handlers.el (url-file-name-completion) |
Date: |
Wed, 31 Jul 2013 04:19:14 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 113608
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=14806
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Wed 2013-07-31 00:19:09 -0400
message:
* lisp/url/url-handlers.el (url-file-name-completion)
(url-file-name-all-completions): Don't signal errors.
modified:
lisp/url/ChangeLog changelog-20091113204419-o5vbwnq5f7feedwu-3116
lisp/url/url-handlers.el
urlhandlers.el-20091113204419-o5vbwnq5f7feedwu-2987
=== modified file 'lisp/url/ChangeLog'
--- a/lisp/url/ChangeLog 2013-07-22 04:06:21 +0000
+++ b/lisp/url/ChangeLog 2013-07-31 04:19:09 +0000
@@ -1,3 +1,8 @@
+2013-07-31 Stefan Monnier <address@hidden>
+
+ * url-handlers.el (url-file-name-completion)
+ (url-file-name-all-completions): Don't signal errors (bug#14806).
+
2013-07-22 Stefan Monnier <address@hidden>
* url-http.el (status): Remove, unused.
=== modified file 'lisp/url/url-handlers.el'
--- a/lisp/url/url-handlers.el 2013-05-22 07:30:44 +0000
+++ b/lisp/url/url-handlers.el 2013-07-31 04:19:09 +0000
@@ -311,11 +311,17 @@
(put 'insert-file-contents 'url-file-handlers 'url-insert-file-contents)
(defun url-file-name-completion (url directory &optional predicate)
- (error "Unimplemented"))
+ ;; 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)
- (error "Unimplemented"))
+ ;; Even if it's not implemented, it's not an error to ask for completion,
+ ;; in case it's available (bug#14806).
+ ;; (error "Unimplemented")
+ nil)
(put 'file-name-all-completions
'url-file-handlers 'url-file-name-all-completions)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] trunk r113608: * lisp/url/url-handlers.el (url-file-name-completion),
Stefan Monnier <=