d73cb5f · typeable/pandoc

git.iko.soy/typeable/pandoc

Improve c4a81fb941adf6c3bf524916c46623685d276f32.

We do want to recognize "0" as a number, even though it has "0" as a prefix.

commitd73cb5f1a86679e42f226125d7f4dbf2564f79af authorJohn MacFarlane <jgm@berkeley.edu> dateSat 4 May 2019, 08:44 (8 years ago) parentc4a81fb

1 file changed+1−1

unifiedsplit

src/Text/Pandoc/Writers/Shared.hs+1−1

@@ -109,7 +109,7 @@ metaValueToJSON blockWriter inlineWriter (MetaMap metamap) = toJSON <$>

109109metaValueToJSON blockWriter inlineWriter (MetaList xs) = toJSON <$>

110110 Traversable.mapM (metaValueToJSON blockWriter inlineWriter) xs

111111metaValueToJSON _ _ (MetaBool b) = return $ toJSON b

112−metaValueToJSON _ inlineWriter (MetaString s@('0':_)) =

112+metaValueToJSON _ inlineWriter (MetaString s@('0':_:_)) =

113113 -- don't treat string with leading 0 as string (#5479)

114114 toJSON <$> inlineWriter (Builder.toList (Builder.text s))

115115metaValueToJSON _ inlineWriter (MetaString s) =