Mercurial > emacs

comparison lisp/vc-svn.el @ 87695:5947c9dc7f6b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vc-svn-registered): Return the correct value for ignored and unregistered files.
author Dan Nicolaescu <dann@ics.uci.edu>
date Thu, 10 Jan 2008 14:17:06 +0000
parents 107ccd98fa12
children c2a952d12e21
comparison
equal deleted inserted replaced
87694:f468b5e13da2 87695:5947c9dc7f6b
130 ;; the process is run on a remote host via Tramp, the error 130 ;; the process is run on a remote host via Tramp, the error
131 ;; is only reported via the exit status which is turned into 131 ;; is only reported via the exit status which is turned into
132 ;; an `error' by vc-do-command. 132 ;; an `error' by vc-do-command.
133 (error nil)))) 133 (error nil))))
134 (when (eq 0 status) 134 (when (eq 0 status)
135 (vc-svn-parse-status file)))))) 135 (not (memq (vc-svn-parse-status file)
136 '(ignored unregistered))))))))
136 137
137 (defun vc-svn-state (file &optional localp) 138 (defun vc-svn-state (file &optional localp)
138 "SVN-specific version of `vc-state'." 139 "SVN-specific version of `vc-state'."
139 (setq localp (or localp (vc-stay-local-p file))) 140 (setq localp (or localp (vc-stay-local-p file)))
140 (with-temp-buffer 141 (with-temp-buffer