[webgl] update color handling (deref)

thi-ng · Oct 1, 2015 · 1eeb036 · 1eeb036
1 parent 43784f3
commit 1eeb036
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/geom-webgl/src/shaders.org b/geom-webgl/src/shaders.org
@@ -104,7 +104,7 @@ Special cases:
                            (= :vec3 type)
                            (fn [x]
                              (if (number? x)
-                               (.call setter gl loc (-> x col/int24 col/as-rgba col/unwrap (subvec 0 3) u-cast))
+                               (.call setter gl loc (-> x col/int24 col/as-rgba deref (subvec 0 3) u-cast))
                                (.call setter gl loc (if (arrays/typed-array? x) x (u-cast x)))))
                            :else
                            (fn [x]