(vc-fetch-cvs-status): Use "-l" option for "cvs status", to make it
non-recursive.
This commit is contained in:
parent
9fe89e7308
commit
2b4603f465
1 changed files with 2 additions and 2 deletions
|
@ -5,7 +5,7 @@
|
|||
;; Author: Eric S. Raymond <esr@snark.thyrsus.com>
|
||||
;; Maintainer: Andre Spiegel <spiegel@inf.fu-berlin.de>
|
||||
|
||||
;; $Id: vc.el,v 1.248 1999/06/15 05:48:18 kwzh Exp kwzh $
|
||||
;; $Id: vc.el,v 1.249 1999/06/15 17:40:09 kwzh Exp $
|
||||
|
||||
;; This file is part of GNU Emacs.
|
||||
|
||||
|
@ -1740,7 +1740,7 @@ There is a special command, `*l', to mark all files currently locked."
|
|||
(let ((default-directory dir))
|
||||
;; Don't specify DIR in this command, the default-directory is
|
||||
;; enough. Otherwise it might fail with remote repositories.
|
||||
(vc-do-command "*vc-info*" 0 "cvs" nil nil "status")
|
||||
(vc-do-command "*vc-info*" 0 "cvs" nil nil "status" "-l")
|
||||
(save-excursion
|
||||
(set-buffer (get-buffer "*vc-info*"))
|
||||
(goto-char (point-min))
|
||||
|
|
Loading…
Add table
Reference in a new issue