[elpa] externals/embark 4d87456dfe: Pass prefix argument to M-x or C-h actions (fixes #679)

[ELPA Syncer]

branch: externals/embark
commit 4d87456dfecf54c86e820159ad903c0f748813c4
Author: Omar Antolín Camarena <omar.antolin@gmail.com>
Commit: Omar Antolín Camarena <omar.antolin@gmail.com>

    Pass prefix argument to M-x or C-h actions (fixes #679)
---
 embark.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/embark.el b/embark.el
index baf6b48341..acaeb9e1cc 100644
--- a/embark.el
+++ b/embark.el
@@ -1248,7 +1248,8 @@ UPDATE is the indicator update function."
                   keymap
                 (let ((overriding-terminal-local-map keymap))
                   (key-binding (seq-take keys (1- (length keys)))
-                               'accept-default)))))
+                               'accept-default))))
+             (prefix-arg prefix-arg)) ; preserve prefix arg
          (when-let ((win (get-buffer-window embark--verbose-indicator-buffer
                                             'visible)))
            (quit-window 'kill-buffer win))
@@ -1282,7 +1283,8 @@ UPDATE is the indicator update function."
        (funcall cmd last-command-event)
        (embark-keymap-prompter keymap update))
       ('execute-extended-command
-       (intern-soft (read-extended-command)))
+       (let ((prefix-arg prefix-arg)) ; preserve prefix arg
+         (intern-soft (read-extended-command))))
       ((or 'keyboard-quit 'keyboard-escape-quit)
        nil)
       (_ cmd))))