/[emacs]/emacs/lisp/vc-svn.el
ViewVC logotype

Diff of /emacs/lisp/vc-svn.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.21 by ttn, Sat Aug 6 22:13:43 2005 UTC revision 1.22 by monnier, Mon Nov 14 04:33:03 2005 UTC
# Line 116  This is only meaningful if you don't use Line 116  This is only meaningful if you don't use
116        (cd (file-name-directory file))        (cd (file-name-directory file))
117        (condition-case nil        (condition-case nil
118            (vc-svn-command t 0 file "status" "-v")            (vc-svn-command t 0 file "status" "-v")
119          ;; We can't find an `svn' executable.  We could also deregister SVN.          ;; Some problem happened.  E.g. We can't find an `svn' executable.
120          (file-error nil))          ;; We used to only catch `file-error' but when the process is run on
121            ;; a remote host via Tramp, the error is only reported via the
122            ;; exit status which is turned into an `error' by vc-do-command.
123            (error nil))
124        (vc-svn-parse-status t)        (vc-svn-parse-status t)
125        (eq 'SVN (vc-file-getprop file 'vc-backend)))))        (eq 'SVN (vc-file-getprop file 'vc-backend)))))
126    

Legend:
Removed from v.1.21  
changed lines
  Added in v.1.22

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26