add custom extensions to the beginning of the schema

- this way extensions have priority

Author: escherize

src/huff2/extension.clj

@@ -26,7 +26,10 @@
      (fn [element]
        ;; We want to add a branch to the hiccup branches.
        (if (hiccup-branches? element)
-         (conj element [node-name node-schema])
+         (vec (concat
+                (take 2 element)
+                [[node-name node-schema]]
+                (drop 2 element)))
          element))
      hiccup-schema)))