summaryrefslogtreecommitdiff
path: root/src/clarktown/correctors.clj
blob: e251595b60d13ddada2dbfee216dc5d54820c03b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
(ns clarktown.correctors
  (:require
    [clarktown.correctors.code-block :as code-block]
    [clarktown.correctors.atx-heading-block :as atx-heading-block]))


(def
  ^{:doc "The default block separation correctors."}
  default-block-separation-correctors
  {:newline-above
   [code-block/empty-line-above?
    atx-heading-block/empty-line-above?]
   :newline-below
   [code-block/empty-line-below?
    atx-heading-block/empty-line-below?]})


(def
  ^{:doc "The default correctors."}
  default-correctors
  {:block-separations default-block-separation-correctors})