From 45232485aef3e44e9106f605ecf155de8f707edb Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sun, 20 Apr 2025 09:40:12 +0800 Subject: [PATCH] vc-user-edit-command: Add trailing space to initial input * lisp/vc/vc-dispatcher.el (vc-user-edit-command): Add trailing space to initial input to ease adding additional flags. --- lisp/vc/vc-dispatcher.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/lisp/vc/vc-dispatcher.el b/lisp/vc/vc-dispatcher.el index bd681b2c1cf..f51eb728cf8 100644 --- a/lisp/vc/vc-dispatcher.el +++ b/lisp/vc/vc-dispatcher.el @@ -328,10 +328,11 @@ Intended to be used as the value of `vc-filter-command-function'." (if file-or-list " (files list to be appended)" "")) - (combine-and-quote-strings - (cons command (remq nil (if files-separator-p - (butlast flags) - flags)))))))) + (concat (combine-and-quote-strings + (cons command (remq nil (if files-separator-p + (butlast flags) + flags)))) + " "))))) (list (car edited) file-or-list (nconc (cdr edited) (and files-separator-p '("--"))))))