                           ;; Probably already flattened, but keeping it here for now
                           :data data
                           :usage :static-draw
-                          :element element
+                          :element [program element]
                           :count (if-let [c (:count input)]
                                    c
                                    (count (:data input)))))]

           data (:data input)]
       (assoc input
         :tag :uniform
         :element element
         :data (if (array? data)
                 data
                 (clj->js (flatten [data]))))))))

        (assoc input
               :data data
               :usage :static-draw
               :element [program element]
               :count (if-let [c (:count input)]
                        c
                        (if (seqable? data)
