# HG changeset patch # User Andr Spiegel # Date 930726974 0 # Node ID 6f932cbd18e8a85972821482ed156d83a7b7cc28 # Parent 5fc7c26535d50daa0b3e435dce1ef0e0c0406b3b (vc-fetch-cvs-status): Use "-l" option for "cvs status", to make it non-recursive. diff -r 5fc7c26535d5 -r 6f932cbd18e8 lisp/vc.el --- a/lisp/vc.el Wed Jun 30 07:10:20 1999 +0000 +++ b/lisp/vc.el Wed Jun 30 07:16:14 1999 +0000 @@ -5,7 +5,7 @@ ;; Author: Eric S. Raymond ;; Maintainer: Andre Spiegel -;; $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 @@ (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))