From 6fc1b795c1bfaded853b1dff225b0c3628014dd7 Mon Sep 17 00:00:00 2001 From: Andrii Kolomoiets Date: Fri, 11 Dec 2020 15:55:22 +0200 Subject: [PATCH] vc-create-tag: use vc-revision-history variable * lisp/vc/vc.el (vc-create-tag): Use 'vc-revision-history' variable. --- lisp/vc/vc.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el index b3b05839662..7d9af00de7c 100644 --- a/lisp/vc/vc.el +++ b/lisp/vc/vc.el @@ -2325,7 +2325,8 @@ checked out in that new branch." ;; to ask for a directory, branches are created at repository level. default-directory (read-directory-name "Directory: " default-directory default-directory t)) - (read-string (if current-prefix-arg "New branch name: " "New tag name: ")) + (read-string (if current-prefix-arg "New branch name: " "New tag name: ") + nil 'vc-revision-history) current-prefix-arg))) (message "Making %s... " (if branchp "branch" "tag")) (when (file-directory-p dir) (setq dir (file-name-as-directory dir))) -- 2.39.2