changeset 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 d54dee52948e
children 8fa7ef477c04
files lisp/vc-cvs.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
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