diff options
| author | Stefan Monnier | 2005-06-10 21:14:10 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2005-06-10 21:14:10 +0000 |
| commit | f1b587064a41ef495ef7a87b992dbdd711d557da (patch) | |
| tree | 6cd1fd945d09179e29b61da6d554adf8a6605011 | |
| parent | cd4344a3ee945afa2e5623b975ef80e21252d204 (diff) | |
| download | emacs-f1b587064a41ef495ef7a87b992dbdd711d557da.tar.gz emacs-f1b587064a41ef495ef7a87b992dbdd711d557da.zip | |
(vc-registered): Explicitly disable VC for URL files.
| -rw-r--r-- | lisp/url/url-handlers.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/url/url-handlers.el b/lisp/url/url-handlers.el index 68bf0ec7ab5..12db63aade8 100644 --- a/lisp/url/url-handlers.el +++ b/lisp/url/url-handlers.el | |||
| @@ -155,6 +155,9 @@ the arguments that would have been passed to OPERATION." | |||
| 155 | ;; These are operations that we do not support yet (DAV!!!) | 155 | ;; These are operations that we do not support yet (DAV!!!) |
| 156 | (put 'file-writable-p 'url-file-handlers 'ignore) | 156 | (put 'file-writable-p 'url-file-handlers 'ignore) |
| 157 | (put 'file-symlink-p 'url-file-handlers 'ignore) | 157 | (put 'file-symlink-p 'url-file-handlers 'ignore) |
| 158 | ;; Just like for ange-ftp: let's not waste time trying to look for RCS/foo,v | ||
| 159 | ;; files and such since we can't do anything clever with them anyway. | ||
| 160 | (put 'vc-registered 'url-file-handlers 'ignore) | ||
| 158 | 161 | ||
| 159 | (defun url-handler-expand-file-name (file &optional base) | 162 | (defun url-handler-expand-file-name (file &optional base) |
| 160 | (if (file-name-absolute-p file) | 163 | (if (file-name-absolute-p file) |