summaryrefslogtreecommitdiff
path: root/lisp/vc-svn.el
diff options
context:
space:
mode:
authorDan Nicolaescu <dann@ics.uci.edu>2008-10-13 01:16:49 +0000
committerDan Nicolaescu <dann@ics.uci.edu>2008-10-13 01:16:49 +0000
commit5870cb7682e7b70471d86b1b0b5724aa0fe18d74 (patch)
treeed1c973bd81a9ea79801b939cbb1bccd58572481 /lisp/vc-svn.el
parentdd4fdc44b1143f7959439eecb00d3a79c471a962 (diff)
downloademacs-5870cb7682e7b70471d86b1b0b5724aa0fe18d74.tar.gz
* vc-hooks.el (vc-stay-local): Add a new choice and default to it.
* vc-cvs.el (vc-cvs-dir-stay-local): Remove. (vc-cvs-stay-local): Add a new choice and default to it. (vc-cvs-dir-status): Use the new vc-stay-local choice. * vc-svn.el (vc-svn-dir-status): Use the new vc-stay-local choice.
Diffstat (limited to 'lisp/vc-svn.el')
-rw-r--r--lisp/vc-svn.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/vc-svn.el b/lisp/vc-svn.el
index f44b55e2a48..2dd3bb32db3 100644
--- a/lisp/vc-svn.el
+++ b/lisp/vc-svn.el
@@ -180,7 +180,8 @@ If you want to force an empty list of arguments, use t."
CALLBACK is called as (CALLBACK RESULT BUFFER), where
RESULT is a list of conses (FILE . STATE) for directory DIR."
;; FIXME should this rather be all the files in dir?
- (let ((remote (not (vc-stay-local-p dir))))
+ (let* ((local (vc-stay-local-p dir))
+ (remote (and local (not (eq local 'only-file)))))
(vc-svn-command (current-buffer) 'async nil "status"
(if remote "-u"))
(vc-exec-after