Respect fill-paragraph-function. Fall back to lisp-fill-paragraph.

1 files changed, 3 insertions, 1 deletions

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)