From 4a1450bcc397ab612cc839d0fb69fce3e6aef52a Mon Sep 17 00:00:00 2001 From: Taylor R Campbell Date: Sat, 9 Jul 2022 08:40:59 +0000 Subject: Respect fill-paragraph-function. Fall back to lisp-fill-paragraph. --- paredit.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/paredit.el b/paredit.el index fd9f038..8b78441 100644 --- a/paredit.el +++ b/paredit.el @@ -1005,7 +1005,9 @@ If the point is in a string or a comment, fill the paragraph instead, (interactive "P") (if (or (paredit-in-string-p) (paredit-in-comment-p)) - (lisp-fill-paragraph argument) + (if (memq fill-paragraph-function '(t nil)) + (lisp-fill-paragraph argument) + (funcall fill-paragraph-function argument)) (paredit-preserving-column (save-excursion (end-of-defun) -- cgit v1.2.1