fix build and tests

This commit is contained in:
Yan Pas 2018-05-09 20:40:37 +03:00
parent a337685fe0
commit ad19166bc3
2 changed files with 4 additions and 2 deletions

View file

@ -32,6 +32,7 @@ Conversion of man to 'Pandoc' document.
-}
module Text.Pandoc.Readers.Man (readMan) where
import Prelude
import Control.Monad.Except (throwError)
import Data.Default (Default)
import Data.Map (insert)

View file

@ -1,6 +1,7 @@
{-# LANGUAGE OverloadedStrings #-}
module Tests.Readers.Man (tests) where
import Prelude
import Data.Text (Text)
import Test.Tasty
import Tests.Helpers
@ -23,9 +24,9 @@ tests = [
testGroup "Macros" [
"Bold" =:
".B foo\n"
=?> strong "foo"
=?> (para $ strong "foo")
, "Italic" =:
".I foo\n"
=?> emph "foo"
=?> (para $ emph "foo")
]
]