diff options
Diffstat (limited to 'src/RenderError.hs')
-rw-r--r-- | src/RenderError.hs | 34 |
1 files changed, 0 insertions, 34 deletions
diff --git a/src/RenderError.hs b/src/RenderError.hs deleted file mode 100644 index 9b9732f..0000000 --- a/src/RenderError.hs +++ /dev/null @@ -1,34 +0,0 @@ -{-# LANGUAGE OverloadedStrings #-} - -module RenderError - ( birthdate - , config - ) where - -import System.IO (stderr) - -import Data.Text (Text) -import qualified Data.Text as T -import qualified Data.Text.IO as T - -import qualified Model.Path as Path - -birthdate :: Text -> IO () -birthdate err = - T.hPutStr stderr $ - T.concat - [ "Error while parsing file " - , T.pack Path.birthdate - , ":\n" - , err - ] - -config :: Text -> IO () -config err = - T.hPutStr stderr $ - T.concat - [ "Error while parsing config file " - , T.pack Path.config - , ":\n" - , err - ] |