 (ns clojure.browser.dom
-  (:require [goog.dom :as dom]))
+  (:require [goog.dom :as gdom]))
 
 (defn append [parent & children]
-  (apply dom/append parent children)
+  (apply gdom/append parent children)
   parent)
 
 (defprotocol DOMBuilder

(defn remove-children
  "Remove all children from the element with the passed id."
  [id]
  (let [parent (dom/getElement (name id))]
    (do (dom/removeChildren parent))))

(defn get-element [id]
  (dom/getElement (name id)))

(defn html [s]
  (dom/htmlToDocumentFragment s))

(defn element-arg? [x]
  (or (keyword? x)
      (map? x)
      (string? x)))

(defn insert-at [parent child index]
  (dom/insertChildAt parent child index))

                         nil)]
         (log-obj str-attrs)
         (if (seq children)
           (apply gdom/createDom
                  (name this)
                  str-attrs
                  (map -element children))
           (gdom/createDom (name this)
                          str-attrs)))))

  Vector
