    layer-props))
 
 (defn layer->svg-path [layer {:keys [invert-colors? layer-props]}]
-  (merge {:d (:layer/path layer)
+  (merge {:d (h/h (:layer/path layer))
           :stroke (if invert-colors? "#ccc" "black")
           :fill "none"
           :stroke-width 2}

          :y (:layer/start-y layer)
          :fill (if invert-colors? "#ccc" "black")
          :stroke-width 0
          :font-family (:layer/font-family layer "Helvetica")
          :font-size   (:layer/font-size layer 20)}
         layer-props))


(ns pc.svg
  (:require [clojure.string :as str]
            [hiccup.core :as h]
            [pc.layers :as layers]))

(defn points->path [points]
