src/clarktown/matchers/list_block.clj


1
2
3
4
5
6
7
8
9
10

(ns clarktown.matchers.list-block
  (:require
    [clojure.string :as string]))


(defn match?
  "Determines whether we're dealing with a list block or not."
  [block]
  (->> (string/trim block)
       (re-matches #"(?s)^(\d\.\s|\*{1}\s|\-{1}\s).*$")))