Commit 7f5cd554 authored by Chong Yidong's avatar Chong Yidong

(vc-cvs-status-extra-headers): Use full directory name when reporting

the module.
parent ddf59b5f
...@@ -1000,8 +1000,8 @@ state." ...@@ -1000,8 +1000,8 @@ state."
(with-temp-buffer (with-temp-buffer
(insert-file-contents "CVS/Repository") (insert-file-contents "CVS/Repository")
(goto-char (point-min)) (goto-char (point-min))
(re-search-forward "[^/\n]*" nil t) (skip-chars-forward "^\n")
(concat (match-string 0) "\n")) (concat (buffer-substring (point-min) (point)) "\n"))
(file-error nil)))) (file-error nil))))
(concat (concat
(cond (module (cond (module
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment