   (if-let [coord-map (get-property [] :coord-map)]
     (if-let [coord ((:id component) coord-map)]
       (let [ps (get-property [] :clip-size)]
-        (m/translation (* (:x coord) (m/x ps)) (* (:y coord (m/y ps)))))
+        (m/translation (+ gap (* (:x coord) (m/x ps))) (+ gap (* (:y coord (m/y ps))))))
       old-position-matrix)
     old-position-matrix))
 

  (:import (java.util.regex Pattern)))


(def gap 0.125)

(def component-min-size (m/defpoint 0.375 0.375))


  (if-let [coord-map (get-property [] :coord-map)]
    (if-let [coord ((:id component) coord-map)]
      (let [ps (get-property [] :clip-size)]
        (m/defpoint (- (* (:w coord) (m/x ps)) gap gap) (- (* (:h coord (m/y ps))) gap gap)))
      old-clip-size)
    old-clip-size))

