handout.hs 390 Bytes
Newer Older
Henrik Tramberend's avatar
Henrik Tramberend committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
#!/usr/bin/env runhaskell
{-# LANGUAGE OverloadedStrings #-}

module Main where

import           Control.Monad
import           Data.Default           ()
import           Data.List.Split
import           Text.Pandoc.Definition ()
import           Text.Pandoc.JSON
import           Text.Pandoc.Walk
import           Text.Printf
import Filter

main :: IO ()
main = toJSONFilter filterNotes