Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Improve c4a81fb941.

Browse source 
We do want to recognize "0" as a number, even though
it has "0" as a prefix.
This commit is contained in:
John MacFarlane 2019-05-04 08:44:59 -07:00
parent c4a81fb941
commit d73cb5f1a8
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/Text/Pandoc/Writers/Shared.hs
View file

@ -109,7 +109,7 @@ metaValueToJSON blockWriter inlineWriter (MetaMap metamap) = toJSON <$>
metaValueToJSON blockWriter inlineWriter (MetaList xs) = toJSON <$>
Traversable.mapM (metaValueToJSON blockWriter inlineWriter) xs
metaValueToJSON _ _ (MetaBool b) = return $ toJSON b
metaValueToJSON _ inlineWriter (MetaString s@('0':_)) =
metaValueToJSON _ inlineWriter (MetaString s@('0':_:_)) =
-- don't treat string with leading 0 as string (#5479)
toJSON <$> inlineWriter (Builder.toList (Builder.text s))
metaValueToJSON _ inlineWriter (MetaString s) =