(vc-cvs-status-extra-headers): Don't match newline

when parsing CVS/Repository.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 158523bc7ac4dd57f6af903a15e625b499d26a63..dde77ec715590d61ef46d7367874b8a410e4e2b3 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2008-06-15  Andreas Schwab  <schwab@suse.de>
 
+       * vc-cvs.el (vc-cvs-status-extra-headers): Don't match newline
+       when parsing CVS/Repository.
+
        * wdired.el (wdired-search-and-rename): Fix undocumented change.
 
 2008-06-15  Ulf Jasper  <ulf@web.de>

diff --git a/lisp/vc-cvs.el b/lisp/vc-cvs.el
index 6c3d4fe5c1826b83e83bc774549b592cace03dae..edaf7f08d7c252cc46dffb35a3125e2b2f474798 100644 (file)
--- a/lisp/vc-cvs.el
+++ b/lisp/vc-cvs.el
@@ -942,7 +942,7 @@ state."
             (with-temp-buffer
               (insert-file-contents "CVS/Repository")
               (goto-char (point-min))
-              (re-search-forward "[^/]*" nil t)
+              (re-search-forward "[^/\n]*" nil t)
               (concat (match-string 0) "\n"))
           (file-error nil))))
     (concat