Mercurial > emacs
diff lisp/vc-svn.el @ 66852:820fa0af32c1
(vc-svn-registered): Catch all errors.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Mon, 14 Nov 2005 04:33:03 +0000 |
parents | 41bb365f41c4 |
children | 76b136e1750a |
line wrap: on
line diff
--- a/lisp/vc-svn.el Mon Nov 14 04:18:53 2005 +0000 +++ b/lisp/vc-svn.el Mon Nov 14 04:33:03 2005 +0000 @@ -116,8 +116,11 @@ (cd (file-name-directory file)) (condition-case nil (vc-svn-command t 0 file "status" "-v") - ;; We can't find an `svn' executable. We could also deregister SVN. - (file-error nil)) + ;; Some problem happened. E.g. We can't find an `svn' executable. + ;; We used to only catch `file-error' but when the process is run on + ;; a remote host via Tramp, the error is only reported via the + ;; exit status which is turned into an `error' by vc-do-command. + (error nil)) (vc-svn-parse-status t) (eq 'SVN (vc-file-getprop file 'vc-backend)))))