[elpa] externals/objed aa776a8 113/166: Make filling paragraphs repeatable

[Clemens Radermacher]

branch: externals/objed
commit aa776a8a73a1d84bc55d7f62e5b13647e8a7bac0
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>

    Make filling paragraphs repeatable
---
 objed.el | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/objed.el b/objed.el
index 7301181..b839b53 100644
--- a/objed.el
+++ b/objed.el
@@ -599,11 +599,12 @@ selected one."
               (key-binding "q" nil t))))
     (if (and (string-match "insert" (symbol-name nc))
              (not buffer-read-only))
-        (cond ((and (not (eq last-command this-command))
-                    (or (eq major-mode 'fundamental-mode)
-                        (derived-mode-p 'text-mode)
-                        (objed--at-comment-p)
-                        (objed--in-string-or-comment-p)))
+        (cond ((or (eq major-mode 'fundamental-mode)
+                   (derived-mode-p 'text-mode)
+                   (objed--at-comment-p)
+                   (objed--in-string-or-comment-p))
+               (when (eq last-command this-command)
+                 (objed-next))
                (call-interactively 'fill-paragraph)
                (objed--switch-to 'textblock)
                (message "Filled paragraph."))