Mercurial > emacs
diff lisp/vc-cvs.el @ 99138:a479c7f4849d
(vc-cvs-status-extra-headers): Use full directory name when reporting
the module.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Sat, 25 Oct 2008 20:59:38 +0000 |
parents | 2cae4bd13e67 |
children | b0dce7f34dda |
line wrap: on
line diff
--- a/lisp/vc-cvs.el Sat Oct 25 20:59:29 2008 +0000 +++ b/lisp/vc-cvs.el Sat Oct 25 20:59:38 2008 +0000 @@ -1000,8 +1000,8 @@ (with-temp-buffer (insert-file-contents "CVS/Repository") (goto-char (point-min)) - (re-search-forward "[^/\n]*" nil t) - (concat (match-string 0) "\n")) + (skip-chars-forward "^\n") + (concat (buffer-substring (point-min) (point)) "\n")) (file-error nil)))) (concat (cond (module