"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "src/Text/Pandoc/Readers/LaTeX.hs" between
pandoc-2.11.1.1.tar.gz and pandoc-2.11.2.tar.gz

About: Pandoc converts files from one markup format into another.

LaTeX.hs  (pandoc-2.11.1.1):LaTeX.hs  (pandoc-2.11.2)
skipping to change at line 1920 skipping to change at line 1920
("", _, _) -> return () ("", _, _) -> return ()
(ident, _, _) -> do (ident, _, _) -> do
num <- getNextNumber sLastFigureNum num <- getNextNumber sLastFigureNum
setState setState
st{ sLastFigureNum = num st{ sLastFigureNum = num
, sLabels = M.insert ident , sLabels = M.insert ident
[Str (renderDottedNum num)] (sLabels st) } [Str (renderDottedNum num)] (sLabels st) }
return $ Image attr' alt' (src, tit') return $ Image attr' alt' (src, tit')
go x = return x go x = return x
getNextNumber :: Monad m
=> (LaTeXState -> DottedNum) -> LP m DottedNum
getNextNumber getCurrentNum = do
st <- getState
let chapnum =
case sLastHeaderNum st of
DottedNum (n:_) | sHasChapters st -> Just n
_ -> Nothing
return . DottedNum $
case getCurrentNum st of
DottedNum [m,n] ->
case chapnum of
Just m' | m' == m -> [m, n+1]
| otherwise -> [m', 1]
Nothing -> [1]
-- shouldn't happen
DottedNum [n] ->
case chapnum of
Just m -> [m, 1]
Nothing -> [n + 1]
_ ->
case chapnum of
Just n -> [n, 1]
Nothing -> [1]
coloredBlock :: PandocMonad m => Text -> LP m Blocks coloredBlock :: PandocMonad m => Text -> LP m Blocks
coloredBlock stylename = try $ do coloredBlock stylename = try $ do
skipopts skipopts
color <- braced color <- braced
notFollowedBy (grouped inline) notFollowedBy (grouped inline)
let constructor = divWith ("",[],[("style",stylename <> ": " <> untokenize col or)]) let constructor = divWith ("",[],[("style",stylename <> ": " <> untokenize col or)])
constructor <$> grouped block constructor <$> grouped block
graphicsPath :: PandocMonad m => LP m Blocks graphicsPath :: PandocMonad m => LP m Blocks
graphicsPath = do graphicsPath = do
 End of changes. 1 change blocks. 
25 lines changed or deleted 0 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)