 ;;;:= TODO: need to clean ':' after keyword
 (defn write-keyword-sentence [level content]
   "write keyword content in level"
-  (let [this_level_mark (reduce str (take (inc level)
-                               (repeat "*")))]
+  (let [this_level_mark (reduce str
+                                (take (inc level)
+                                      (repeat "*")))]
     ;;(print this_level_mark)
     (doall (map #(str this_level_mark
                       " "

    (println)))

(defn print-with-keyword [filepath tuples keyword]
  (let [filter-content (filter
                        #(-> (str "(?<=" keyword ":" ").*$") (re-pattern) (re-find (second %)))
                        tuples)]
    (if (not (empty? filter-content))
      (printline filepath filter-content)
      )))

(defn list2tree [ls keyword]

(ns codeitlater.format
  (:require [clojure.string :as str])
  )

(defn printline [filepath tuples]
