diff options
| author | Albert Krewinkel <albert@zeitkraut.de> | 2020-03-22 20:28:45 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2020-03-22 12:28:45 -0700 |
| commit | f2b337768e95c8903f65e597f7d8cd81938dacc3 (patch) | |
| tree | 16b228d1b38868cee264aa2ccdf3b8c8d890bb90 /src/Text/Pandoc/Writers/ICML.hs | |
| parent | 22bf3d6727aa36f6079f89c602c59ba7b71e4475 (diff) | |
| download | pandoc-f2b337768e95c8903f65e597f7d8cd81938dacc3.tar.gz | |
Finer grained imports of Text.Pandoc.Class submodules (#6203)
This should speed-up recompilation after changes in `Text.Pandoc.Class`,
as the number of modules affected by a change will be smaller in
general. It also offers faster insights into the parts of `T.P.Class`
used within a module.
Diffstat (limited to 'src/Text/Pandoc/Writers/ICML.hs')
| -rw-r--r-- | src/Text/Pandoc/Writers/ICML.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Writers/ICML.hs b/src/Text/Pandoc/Writers/ICML.hs index 6aa97d4f1..997961f37 100644 --- a/src/Text/Pandoc/Writers/ICML.hs +++ b/src/Text/Pandoc/Writers/ICML.hs @@ -24,8 +24,7 @@ import Data.Maybe (fromMaybe, maybeToList) import qualified Data.Set as Set import qualified Data.Text as Text import Data.Text (Text) -import Text.Pandoc.Class (PandocMonad, report) -import qualified Text.Pandoc.Class as P +import Text.Pandoc.Class.PandocMonad (PandocMonad, fetchItem, report) import Text.Pandoc.Definition import Text.Pandoc.ImageSize import Text.Pandoc.Logging @@ -550,7 +549,7 @@ styleToStrAttr style = imageICML :: PandocMonad m => WriterOptions -> Style -> Attr -> Target -> WS m (Doc Text) imageICML opts style attr (src, _) = do imgS <- catchError - (do (img, _) <- P.fetchItem src + (do (img, _) <- fetchItem src case imageSize opts img of Right size -> return size Left msg -> do |