 (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]]))
+            [clojure.string :as str]))
 
 (def ^:dynamic *base-url* nil)
 

               :else (seq %))
            classes)
       (flatten)
       (join " ")))

(defn wrapped-type?
  "Return true if the element `type` needs to be wrapped."

  (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))

