         (throw e)))))
 
 (defn asset-seq
-  "Returns a seq of asset names for a specific url"
+  "Returns a seq of previously cached asset names for a specific url"
   [url]
   (let [dir (cache-dir url)
         dir (file dir)]
     (ls-names dir)))
 
-(defn asset
+(defn asset-path
   "Given a url will return a path to a copy of the asset on the local file
   system. Will download and persist the asset if necessary."
-  ([url] (asset url (last (split url #"/"))))
+  ([url] (asset-path url (last (split url #"/"))))
   ([url name]
      (if-let [path (fetch-cached-path url name)]
        path

        (when (dir-empty? (cache-dir url))
          (download-unzip-and-cache-bundled-asset url))
        (fetch-cached-path url internal-path)))))


(def ^{:dynamic true} *cache-root* (:assets OVERTONE-DIRS))

(defn- safe-url
  "Replace all non a-z A-Z 0-9 - chars in stringified version of url with _"
  [url]
  (let [url  (str url)
