[elpa] externals/objed ae9f965 041/216: Fixes #9

[Stefan Monnier]

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

    Fixes #9
---
 objed-objects.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/objed-objects.el b/objed-objects.el
index 9b1a70f..809188f 100644
--- a/objed-objects.el
+++ b/objed-objects.el
@@ -1622,9 +1622,11 @@ non-nil the indentation block can contain empty lines."
         (opos (point)))
     (cl-letf (((symbol-function 'fill-region-as-paragraph)
                (lambda (beg end &rest _)
-                 (setq po (cons beg end)))))
+                 (setq po (cons beg end))
+                (throw 'done t))))
       ;; let inner not move point in general?
-      (fill-paragraph)
+      (catch 'done
+       (fill-paragraph))
       (when (consp po)
        (goto-char (car po))
        (objed--skip-ws)