Merge pull request #43 from Respo/warn-color

Warn about color syntax

meyvn.edn

@@ -1,7 +1,7 @@
 
 {:pom {:group-id "respo",
        :artifact-id "composer",
-       :version "0.1.17-a1",
+       :version "0.1.17-a3",
        :name "Respo composer renderer library"}
  :packaging {:jar {:enabled true
                    :remote-repository {:id "clojars"

src/composer/comp/editor.cljs

@@ -247,7 +247,7 @@
    (=< nil 4)
    (cursor-> :operations comp-operations states template (or focused-path []))
    (div
-    {:style (merge ui/flex {:overflow :auto, :padding "0 8px"})}
+    {:style (merge ui/flex {:overflow :auto, :padding "0 8px 120px 8px"})}
     (comp-markup (:markup template) [] focused-path active-paths)
     (when config/dev? (comp-inspect "Markup" (:markup template) {:bottom 0}))))
   (div {:style {:width 1, :background-color "#eee"}})

src/composer/core.cljs

@@ -115,7 +115,18 @@
     (->> attrs (map (fn [[k v]] [(keyword k) (read-token v data state)])) (into {}))))
 
 (defn read-styles [style data state]
-  (->> style (map (fn [[k v]] [k (read-token v data state)])) (into {})))
+  (->> style
+       (map
+        (fn [[k v]]
+          [k
+           (cond
+             (re-matches #"^\#[0-9a-f]{3}$" v)
+               (do (js/console.warn "Outdated color syntax" v) v)
+             (re-matches #"^\#[0-9a-f]{6}$" v)
+               (do (js/console.warn "Outdated color syntax" v) v)
+             read-token v
+             data state)]))
+       (into {})))
 
 (defn style-presets [preset-ids presets]
   (->> preset-ids