From 9c14bd04f1b9eb7bafcd348db773572fa7db30c9 Mon Sep 17 00:00:00 2001 From: Gracjan Polak Date: Sat, 26 Dec 2015 16:46:05 +0100 Subject: [PATCH] Properly separate haddock paragraphs --- haskell-mode.el | 2 +- tests/haskell-mode-tests.el | 2 -- 2 files changed, 1 insertion(+), 3 deletions(-) diff --git a/haskell-mode.el b/haskell-mode.el index b36416820..a1925074c 100644 --- a/haskell-mode.el +++ b/haskell-mode.el @@ -644,7 +644,7 @@ Minor modes that work well with `haskell-mode': (set (make-local-variable 'paragraph-start) (concat " *{-\\| *-- |\\|" page-delimiter)) (set (make-local-variable 'paragraph-separate) - (concat " *$\\| *-- |\\| *\\({-\\|-}\\) *$\\|" page-delimiter)) + (concat " *$\\| *\\({-\\|-}\\) *$\\|" page-delimiter)) (set (make-local-variable 'fill-paragraph-function) 'haskell-fill-paragraph) ;; (set (make-local-variable 'adaptive-fill-function) 'haskell-adaptive-fill) (set (make-local-variable 'adaptive-fill-mode) nil) diff --git a/tests/haskell-mode-tests.el b/tests/haskell-mode-tests.el index 6dba27b2b..301ed977d 100644 --- a/tests/haskell-mode-tests.el +++ b/tests/haskell-mode-tests.el @@ -378,8 +378,6 @@ Also should respect 10 column fill." '("-- @| a b c d"))) (ert-deftest fill-comment-haddock-2 () - ;; FIXME: This shouldn't be failing, https://github.com/haskell/haskell-mode/issues/851. - :expected-result :failed (check-fill '("-- | a b c" "-- d e") '("-- @| a b c d"