unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
* bug#45176: 28.0.50; [PATCH] vc-create-tag: Use 'vc-revision-history' variable
@ 2020-12-11 14:01 Andrii Kolomoiets
  2020-12-13  2:01 ` Dmitry Gutov
  0 siblings, 1 reply; 2+ messages in thread
From: Andrii Kolomoiets @ 2020-12-11 14:01 UTC (permalink / raw)
  To: 45176

[-- Attachment #1: Type: text/plain, Size: 97 bytes --]

This way created branch/tag name will appear in history on
e.g. 'vc-merge'.

See attached patch.

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: 0001-vc-create-tag-use-vc-revision-history-variable.patch --]
[-- Type: text/x-patch, Size: 1074 bytes --]

From d45b90261debe5c6a261a0f5eb193be5f233b326 Mon Sep 17 00:00:00 2001
From: Andrii Kolomoiets <andreyk.mad@gmail.com>
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 b3b0583966..7d9af00de7 100644
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -2325,7 +2325,8 @@ vc-create-tag
 	  ;; 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.15.1


^ permalink raw reply related	[flat|nested] 2+ messages in thread

* bug#45176: 28.0.50; [PATCH] vc-create-tag: Use 'vc-revision-history' variable
  2020-12-11 14:01 bug#45176: 28.0.50; [PATCH] vc-create-tag: Use 'vc-revision-history' variable Andrii Kolomoiets
@ 2020-12-13  2:01 ` Dmitry Gutov
  0 siblings, 0 replies; 2+ messages in thread
From: Dmitry Gutov @ 2020-12-13  2:01 UTC (permalink / raw)
  To: Andrii Kolomoiets, 45176-done

On 11.12.2020 16:01, Andrii Kolomoiets wrote:
> This way created branch/tag name will appear in history on
> e.g. 'vc-merge'.
> 
> See attached patch.

Thanks, pushed.





^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2020-12-13  2:01 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2020-12-11 14:01 bug#45176: 28.0.50; [PATCH] vc-create-tag: Use 'vc-revision-history' variable Andrii Kolomoiets
2020-12-13  2:01 ` Dmitry Gutov

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).