diff options
| author | Eric S. Raymond <esr@snark.thyrsus.com> | 2007-12-26 23:24:08 +0000 |
|---|---|---|
| committer | Eric S. Raymond <esr@snark.thyrsus.com> | 2007-12-26 23:24:08 +0000 |
| commit | cdce374aed500a9b86f96af71d72a618d9639054 (patch) | |
| tree | 85372217cfc358e5b77b90c1cd59b600663f386d /lisp/vc-mcvs.el | |
| parent | f24830d2b74c9f86626661d143d10804d8e22a62 (diff) | |
| download | emacs-cdce374aed500a9b86f96af71d72a618d9639054.tar.gz | |
*** empty log message ***
Diffstat (limited to 'lisp/vc-mcvs.el')
| -rw-r--r-- | lisp/vc-mcvs.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc-mcvs.el b/lisp/vc-mcvs.el index c3b68f8aeaf..70d502c7670 100644 --- a/lisp/vc-mcvs.el +++ b/lisp/vc-mcvs.el @@ -178,7 +178,7 @@ This is only meaningful if you don't use the implicit checkout model (defalias 'vc-mcvs-state-heuristic 'vc-cvs-state-heuristic) (defun vc-mcvs-dir-state (dir) - "Find the Meta-CVS state of all files in DIR." + "Find the Meta-CVS state of all files in DIR and subdirectories." ;; if DIR is not under Meta-CVS control, don't do anything. (when (file-readable-p (expand-file-name "MCVS/CVS/Entries" dir)) (if (vc-stay-local-p dir) @@ -188,7 +188,7 @@ This is only meaningful if you don't use the implicit checkout model ;; enough. Otherwise it might fail with remote repositories. (with-temp-buffer (setq default-directory (vc-mcvs-root dir)) - (vc-mcvs-command t 0 nil "status" "-l") + (vc-mcvs-command t 0 nil "status") (goto-char (point-min)) (while (re-search-forward "^=+\n\\([^=\n].*\n\\|\n\\)+" nil t) (narrow-to-region (match-beginning 0) (match-end 0)) |