[elpa] externals/objed d36e277 22/34: Don't support objed-extend with marked objects

[Stefan Monnier]

branch: externals/objed
commit d36e2773d84669572a13710085ce9d4d1e3e2306
Author: Clemens Radermacher <clemera@posteo.net>
Commit: Clemens Radermacher <clemera@posteo.net>

    Don't support objed-extend with marked objects
---
 objed.el | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

diff --git a/objed.el b/objed.el
index d127800..94fb001 100644
--- a/objed.el
+++ b/objed.el
@@ -2383,6 +2383,8 @@ objed movement commands.
 The active region will be used as the current object when an
 objed operation is used."
   (interactive)
+  (when objed--marked-ovs
+    (user-error "objed-extend: Currently not supported with marked objects"))
   (if (region-active-p)
       (if (fboundp 'er/expand-region)
           (call-interactively 'er/expand-region)
@@ -4003,11 +4005,7 @@ ON got applied."
 
 (defun objed--do-objects (action exit)
   "Apply ACTION on marked objects and exit with EXIT."
-  (let* ((ovs (if (use-region-p)
-                  (cons (make-overlay (region-beginning)
-                                      (region-end))
-                        (copy-sequence objed--marked-ovs))
-                (copy-sequence objed--marked-ovs)))
+  (let* ((ovs (copy-sequence objed--marked-ovs))
          (appendp (memq action '(kill-region copy-region-as-kill)))
          (n 0)
          (mc (and (eq exit 'mc)