[elpa] externals/shell-command+ 7540f9809e: Ensure that point gets placed after the replaced output

[ELPA Syncer]

branch: externals/shell-command+
commit 7540f9809e3e88b19124958efa427e5fb0dbfefd
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    Ensure that point gets placed after the replaced output
---
 shell-command+.el | 13 +++++++------
 1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/shell-command+.el b/shell-command+.el
index 67a6866d51..2056a30b36 100644
--- a/shell-command+.el
+++ b/shell-command+.el
@@ -150,7 +150,8 @@ For PARSE, FORM and CONTEXT see `shell-command+-features'."
                      (eq mode 'output) (eq mode 'input))
                  (lambda (input beg end)
                    (delete-region beg end)
-                   (shell-command input t shell-command-default-error-buffer)))
+                   (shell-command input t shell-command-default-error-buffer)
+                   (exchange-point-and-mark)))
                 ((if shell-command+-flip-redirection
                      (eq mode 'input) (eq mode 'output))
                  (lambda (input beg end)
@@ -161,7 +162,8 @@ For PARSE, FORM and CONTEXT see `shell-command+-features'."
                  (lambda (input beg end)
                    (shell-command-on-region
                     beg end input t t
-                    shell-command-default-error-buffer t)))
+                    shell-command-default-error-buffer t)
+                   (exchange-point-and-mark)))
                 (t form))
           context)))
 
@@ -528,10 +530,9 @@ can be combined but will be processed in the following 
order:"
         (setq parse (nth 0 step)
               form (nth 1 step)
               context (nth 2 step))))
-    (save-excursion
-      (funcall context form (nth 3 parse)
-               (or beg (point-min))
-               (or end (point-max))))))
+    (funcall context form (nth 3 parse)
+             (or beg (point-min))
+             (or end (point-max)))))
 
 (provide 'shell-command+)