Gah, so many changes

1 files changed, 10 insertions, 9 deletions

@@ -143,7 +143,7 @@ within a `with-current-buffer' form."
   (let ((pred (or predicate t)))
     (dolist (buf (buffer-list))
       (with-current-buffer buf
-        (when (funcall pred buf)
+        (when (if (fboundp pred) (funcall pred buf) pred)
           (funcall func))))))
 
 ;; https://github.com/cstby/emacs.d/blob/main/init.el#L67
@@ -176,14 +176,15 @@ surrounded by empty lines, so opening a paragraph means to make
 three blank lines, then place the point on the second one."
   (interactive "*")
   (unless (derived-mode-p 'special-mode 'lui-mode 'comint-mode)
-   ;; Go to next blank line.  This /isn't/ `end-of-paragraph-text' because
-   ;; that's weird with org, and I'm guessing other modes too.
-   (while (not (looking-at "^$"))
-     (forward-line 1))
-   (newline)
-   (delete-blank-lines)
-   (newline 2)
-   (previous-line)))
+    ;; Go to next blank line.  This /isn't/ `end-of-paragraph-text' because
+    ;; that's weird with org, and I'm guessing other modes too.
+    (while (and (not (looking-at "^$"))
+                (< (point) (point-max)))
+      (forward-line 1))
+    (newline)
+    (delete-blank-lines)
+    (newline 2)
+    (previous-line)))
 
 (defun +split-window-then (&optional where arg)
   "Split the window into a new buffer.