diff options
author | Jasper Van der Jeugt <m@jaspervdj.be> | 2015-01-23 15:38:06 +0100 |
---|---|---|
committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2015-01-23 15:38:06 +0100 |
commit | ecf1573faede34fbe58328654137f65f6927aba5 (patch) | |
tree | 23fece1baf088ea3b2971aec6f8b7f1d3edba303 /src | |
parent | dfcf2ab20220a78f1ae997b8df9dcb03c6e2c009 (diff) | |
download | stylish-haskell-ecf1573faede34fbe58328654137f65f6927aba5.tar.gz |
Fix warnings
Diffstat (limited to 'src')
-rw-r--r-- | src/Language/Haskell/Stylish/Parse.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Language/Haskell/Stylish/Parse.hs b/src/Language/Haskell/Stylish/Parse.hs index ac5aafb..8b3d34b 100644 --- a/src/Language/Haskell/Stylish/Parse.hs +++ b/src/Language/Haskell/Stylish/Parse.hs @@ -5,7 +5,6 @@ module Language.Haskell.Stylish.Parse -------------------------------------------------------------------------------- -import Control.Monad.Error (throwError) import Data.Maybe (fromMaybe, listToMaybe) import qualified Language.Haskell.Exts.Annotated as H @@ -61,6 +60,6 @@ parseModule extraExts mfp string = do case H.parseModuleWithComments mode noCpp of H.ParseOk md -> return md - err -> throwError $ + err -> Left $ "Language.Haskell.Stylish.Parse.parseModule: could not parse " ++ fp ++ ": " ++ show err |