diff options
author | Dan Nicolaescu <dann@ics.uci.edu> | 2008-10-13 01:16:49 +0000 |
---|---|---|
committer | Dan Nicolaescu <dann@ics.uci.edu> | 2008-10-13 01:16:49 +0000 |
commit | 5870cb7682e7b70471d86b1b0b5724aa0fe18d74 (patch) | |
tree | ed1c973bd81a9ea79801b939cbb1bccd58572481 /lisp/vc-svn.el | |
parent | dd4fdc44b1143f7959439eecb00d3a79c471a962 (diff) | |
download | emacs-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.el | 3 |
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 |