diff options
| author | Dmitry Gutov | 2020-06-18 01:09:29 +0300 |
|---|---|---|
| committer | Dmitry Gutov | 2020-06-18 01:09:49 +0300 |
| commit | e2f443df17710c74fa6a2e51dd061f7e898d48e6 (patch) | |
| tree | 966d5b8f41990e9d8184a705bd8a20800c982d6b | |
| parent | 5502eedf90d0da27df0c6c1fa33389d849d59a80 (diff) | |
| download | emacs-e2f443df17710c74fa6a2e51dd061f7e898d48e6.tar.gz emacs-e2f443df17710c74fa6a2e51dd061f7e898d48e6.zip | |
vc-git-dir-extra-headers: Fix recent breakage
* lisp/vc/vc-git.el (vc-git-dir-extra-headers): Account for
'remote' being set to "" when not found
(https://lists.gnu.org/archive/html/emacs-devel/2020-06/msg00582.html).
(vc-git-dir-extra-headers): Check the value of remote-url instead.
| -rw-r--r-- | lisp/vc/vc-git.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el index 96ee59db8e6..1cd2a7bb133 100644 --- a/lisp/vc/vc-git.el +++ b/lisp/vc/vc-git.el | |||
| @@ -747,7 +747,7 @@ or an empty string if none." | |||
| 747 | (concat "branch." branch ".remote"))))) | 747 | (concat "branch." branch ".remote"))))) |
| 748 | (when (string-match "\\([^\n]+\\)" remote) | 748 | (when (string-match "\\([^\n]+\\)" remote) |
| 749 | (setq remote (match-string 1 remote))) | 749 | (setq remote (match-string 1 remote))) |
| 750 | (when remote | 750 | (when (> (length remote) 0) |
| 751 | (setq remote-url (vc-git-repository-url dir remote)))) | 751 | (setq remote-url (vc-git-repository-url dir remote)))) |
| 752 | (setq branch "not (detached HEAD)")) | 752 | (setq branch "not (detached HEAD)")) |
| 753 | (when stash-list | 753 | (when stash-list |
| @@ -803,7 +803,7 @@ or an empty string if none." | |||
| 803 | (propertize "Branch : " 'face 'font-lock-type-face) | 803 | (propertize "Branch : " 'face 'font-lock-type-face) |
| 804 | (propertize branch | 804 | (propertize branch |
| 805 | 'face 'font-lock-variable-name-face) | 805 | 'face 'font-lock-variable-name-face) |
| 806 | (when remote | 806 | (when remote-url |
| 807 | (concat | 807 | (concat |
| 808 | "\n" | 808 | "\n" |
| 809 | (propertize "Remote : " 'face 'font-lock-type-face) | 809 | (propertize "Remote : " 'face 'font-lock-type-face) |