[elpa] externals/objed 3a983ab 205/216: Read arguments of rcmd after region is established

[Stefan Monnier]

branch: externals/objed
commit 3a983abc4e0eb851324a627b259ba3a3f0395ab5
Author: Clemera <address@hidden>
Commit: Clemera <address@hidden>

    Read arguments of rcmd after region is established
---
 objed.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/objed.el b/objed.el
index 841ecc4..eccf2c1 100644
--- a/objed.el
+++ b/objed.el
@@ -1991,15 +1991,15 @@ When PREFIX is given it will be used by RCMD as
 `current-prefix-arg'."
   (let ((current-prefix-arg prefix)
         (handler (if (fboundp #'funcall-interactively)
-                     #'funcall-interactively #'funcall))
-        (oargs (objed--eval-rspec rcmd)))
+                     #'funcall-interactively #'funcall)))
     (lambda (beg end)
       (save-mark-and-excursion
        ;; in case the region commands expects an active region...
        (goto-char beg)
        (push-mark end t t)
        (objed--with-allow-input
-        (let ((this-command rcmd))
+        (let ((this-command rcmd)
+              (oargs (objed--eval-rspec rcmd)))
           (apply handler rcmd beg end oargs)))))))