Commit 52964e54 authored by Dan Nicolaescu's avatar Dan Nicolaescu
Browse files

(vc-git-dir-extra-headers): Set the branch name

correctly in the detached head case.
(vc-git-print-log): Remove unused binding.
parent 5ba6c2e1
2009-10-14 Dan Nicolaescu <dann@ics.uci.edu>
* vc-git.el (vc-git-dir-extra-headers): Set the branch name
correctly in the detached head case.
(vc-git-print-log): Remove unused binding.
* vc.el (vc-responsible-backend): When a directory is passed for
for registration create a VC repository if no backend is
responsible for the directory argument.
......
......@@ -421,7 +421,7 @@ If nil, use the value of `vc-diff-switches'. If t, use no switches."
(vc-git--out-ok "config" (concat "remote." remote ".url"))))))
(when (string-match "\\([^\n]+\\)" remote-url)
(setq remote-url (match-string 1 remote-url))))
"not (detached HEAD)")
(setq branch "not (detached HEAD)"))
;; FIXME: maybe use a different face when nothing is stashed.
(concat
(propertize "Branch : " 'face 'font-lock-type-face)
......@@ -503,10 +503,7 @@ If nil, use the value of `vc-diff-switches'. If t, use no switches."
(defun vc-git-print-log (files &optional buffer shortlog)
"Get change log associated with FILES."
(let ((coding-system-for-read git-commits-coding-system)
;; Support both the old print-log interface that passes a
;; single file, and the new one that passes a file list.
(flist (if (listp files) files (list files))))
(let ((coding-system-for-read git-commits-coding-system))
;; `vc-do-command' creates the buffer, but we need it before running
;; the command.
(vc-setup-buffer buffer)
......
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