diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2020-09-19 15:55:11 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2020-09-21 10:09:59 -0700 |
| commit | 045dd212a722c275ae8e8358c70e990ad4e90c51 (patch) | |
| tree | a740f42a02de405099cdbfa4524b6de090e03072 /src/Text/Pandoc/Error.hs | |
| parent | ba591ba365da41f52cacc7c1cb2f2d87c9ba3cdc (diff) | |
| download | pandoc-045dd212a722c275ae8e8358c70e990ad4e90c51.tar.gz | |
Remove duplicate tshow definition.
Diffstat (limited to 'src/Text/Pandoc/Error.hs')
| -rw-r--r-- | src/Text/Pandoc/Error.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Error.hs b/src/Text/Pandoc/Error.hs index 4c3c1af79..2e67e5bc1 100644 --- a/src/Text/Pandoc/Error.hs +++ b/src/Text/Pandoc/Error.hs @@ -31,6 +31,7 @@ import qualified Text.Pandoc.UTF8 as UTF8 import Text.Printf (printf) import Text.Parsec.Error import Text.Parsec.Pos hiding (Line) +import Text.Pandoc.Shared (tshow) type Input = Text @@ -144,6 +145,3 @@ err exitCode msg = do UTF8.hPutStrLn stderr (T.unpack msg) exitWith $ ExitFailure exitCode return undefined - -tshow :: Show a => a -> Text -tshow = T.pack . show |