                :else (seq %))
             classes)
        (flatten)
-       (join " ")))
+       (str/join " ")))
 
 (defn wrapped-type?
   "Return true if the element `type` needs to be wrapped."

(ns sablono.util
  #?(:cljs (:import goog.Uri))
  (:refer-clojure :exclude [replace])
  (:require [clojure.set :refer [rename-keys]]
            [clojure.string :refer [blank? capitalize join split replace]]))

(def ^:dynamic *base-url* nil)


  (if (or (keyword? k)
          (string? k)
          (symbol? k))
    (let [[first-word & words] (str/split (name k) #"-")]
      (if (or (empty? words)
              (= "aria" first-word)
              (= "data" first-word))
        k (-> (map str/capitalize words)
              (conj first-word)
              str/join
              keyword)))
    k))

