diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2005-06-10 21:14:10 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2005-06-10 21:14:10 +0000 |
commit | f1b587064a41ef495ef7a87b992dbdd711d557da (patch) | |
tree | 6cd1fd945d09179e29b61da6d554adf8a6605011 | |
parent | cd4344a3ee945afa2e5623b975ef80e21252d204 (diff) | |
download | emacs-f1b587064a41ef495ef7a87b992dbdd711d557da.tar.gz emacs-f1b587064a41ef495ef7a87b992dbdd711d557da.tar.bz2 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." ;; These are operations that we do not support yet (DAV!!!) (put 'file-writable-p 'url-file-handlers 'ignore) (put 'file-symlink-p 'url-file-handlers 'ignore) +;; Just like for ange-ftp: let's not waste time trying to look for RCS/foo,v +;; files and such since we can't do anything clever with them anyway. +(put 'vc-registered 'url-file-handlers 'ignore) (defun url-handler-expand-file-name (file &optional base) (if (file-name-absolute-p file) |