diff --git a/app/EpubParser.hs b/app/EpubParser.hs index b3e5c8d..3065d22 100644 --- a/app/EpubParser.hs +++ b/app/EpubParser.hs @@ -21,6 +21,7 @@ import Control.Monad.Reader (ReaderT, MonadReader(ask), liftIO) import Control.Monad.Except (runExceptT) import System.FilePath (takeDirectory, (), normalise, takeExtension) import Data.List (find) +import Text.HTML.TagSoup import Codec.Epub.Parse (getManifest , getSpine) import qualified Codec.Epub.Data.Manifest as DM diff --git a/svitak.cabal b/svitak.cabal index 0c174dc..8edb8b2 100644 --- a/svitak.cabal +++ b/svitak.cabal @@ -85,11 +85,14 @@ executable svitak test-suite svitak-test main-is: Spec.hs + type: exitcode-stdio-1.0 other-modules: EpubParser, Persistence + hs-source-dirs: test, app + build-depends: base ^>= 4.21.0.0, base64-bytestring, bytestring, @@ -101,6 +104,4 @@ test-suite svitak-test zip-archive, directory - hs-source-dirs: test, app default-language: Haskell2010 -