Commit 2b4603f4 authored by André Spiegel's avatar André Spiegel
Browse files

(vc-fetch-cvs-status): Use "-l" option for "cvs status", to make it

non-recursive.
parent 9fe89e73
......@@ -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))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment