import FixFigures
import LangFilter
import NiceDate
import SlugTags
import Text.Pandoc.JSON
import Text.Pandoc.Walk

main :: IO ()
main = toJSONFilter $
  fmap (walk (niceDate . slugTags) . walk fixFigures) .
  langFilter "currentcolor"