]> git.eshelyaron.com Git - emacs.git/commitdiff
vc-user-edit-command: Add trailing space to initial input
authorSean Whitton <spwhitton@spwhitton.name>
Sun, 20 Apr 2025 01:40:12 +0000 (09:40 +0800)
committerEshel Yaron <me@eshelyaron.com>
Mon, 21 Apr 2025 20:40:22 +0000 (22:40 +0200)
* lisp/vc/vc-dispatcher.el (vc-user-edit-command): Add trailing
space to initial input to ease adding additional flags.

(cherry picked from commit 45232485aef3e44e9106f605ecf155de8f707edb)

lisp/vc/vc-dispatcher.el

index b644a048630ed41907693b2f5998bc420e39ebaf..7e9e6091ff71eaed73e14e5d03f0f780bdf2c467 100644 (file)
@@ -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 '("--"))))))