diff options
Diffstat (limited to 'src/Text/Pandoc/Readers/LaTeX.hs')
-rw-r--r-- | src/Text/Pandoc/Readers/LaTeX.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index 69aec212f..0bafa0d19 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -1508,7 +1508,7 @@ include name = do _ | name == "usepackage" -> addExtension f ".sty" | otherwise -> addExtension f ".tex" dirs <- (map T.unpack . splitTextBy (==':') . fromMaybe ".") <$> lookupEnv "TEXINPUTS" - mapM_ (insertIncluded dirs) (map addExt fs) + mapM_ (insertIncluded dirs . addExt) fs return mempty insertIncluded :: PandocMonad m @@ -1559,7 +1559,7 @@ macroDef constructor = do mbenv <- newenvironment case mbenv of Nothing -> return () - Just (name, macro1, macro2) -> do + Just (name, macro1, macro2) -> guardDisabled Ext_latex_macros <|> do updateState $ \s -> s{ sMacros = M.insert name macro1 (sMacros s) } @@ -1669,7 +1669,7 @@ newenvironment = do | mtype == "newenvironment" -> do report $ MacroAlreadyDefined name pos return Nothing - | mtype == "provideenvironment" -> do + | mtype == "provideenvironment" -> return Nothing _ -> return $ Just (name, Macro ExpandWhenUsed argspecs optarg startcontents, |