From 5933055a3e7387b0095f0df7876a208ab15f4f45 Mon Sep 17 00:00:00 2001 From: Philip Kaludercic Date: Sat, 15 Oct 2022 00:06:25 +0200 Subject: [PATCH] * lisp/vc/vc-git.el (vc-git-symbolic-commit): Use --no-undefined --- lisp/vc/vc-git.el | 19 +++++++++---------- 1 file changed, 9 insertions(+), 10 deletions(-) diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el index 0eae7dd6b85..3c6afec0378 100644 --- a/lisp/vc/vc-git.el +++ b/lisp/vc/vc-git.el @@ -2038,16 +2038,15 @@ allowed to include revision specifications like \"master~8\" branch), otherwise such revision specifications are rejected, and the function returns nil." (and commit - (let ((name (with-temp-buffer - (and - (vc-git--out-ok "name-rev" "--name-only" commit) - (goto-char (point-min)) - (or force (not (looking-at "^.*[~^].*$" t))) - (= (forward-line 2) 1) - (bolp) - (buffer-substring-no-properties (point-min) - (1- (point-max))))))) - (and name (not (string= name "undefined")) name)))) + (with-temp-buffer + (and + (vc-git--out-ok "name-rev" "--no-undefined" "--name-only" commit) + (goto-char (point-min)) + (or force (not (looking-at "^.*[~^].*$" t))) + (= (forward-line 2) 1) + (bolp) + (buffer-substring-no-properties (point-min) + (1- (point-max))))))) (defvar-keymap vc-dir-git-mode-map "z c" #'vc-git-stash -- 2.39.5