            (str "\n"
                 (indent-line-breaks (str s "\n")
                                     indent-base
-                                    :override [:end " x x x  "]))
+                                    :override [:end "   "]))
            (str s))
          "\n")))
 

(defn base-indent-slinky
  [& {:keys [override underride]
      :or {override [] underride []}}]
  #spy/d (concat override
          [:start " "
           :end " o o  "
           :default (fn [i]
                      {:fg* i :text "|"})]
          underride))


(defn slinky->str
  [sl n]
  (let [{:keys [start end]} (first-wins sl)]
    (->> [[(slinky-part->str start nil)]
          (map #(slinky-part->str
                 (slinky-first-match sl
