src/clarktown/parsers/horizontal_line_block.clj


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

(ns clarktown.parsers.horizontal-line-block
  (:require
    [clojure.string :as string]))


(defn is?
  "Determines whether the given block is a horizontal line block."
  [block]
  (or (= "***" (string/trim block))
      (= "---" (string/trim block))))


(defn render
  "Renders the horizontal line block."
  [_ _]
  "<hr>")