   (let [root (str "/" virtual-folder "/" application-version)]
     (reset! asset-configuration
       {:application-version application-version
+       :expiration (now-plus-ten-years)
        :public-folder public-folder
        :virtual-folder virtual-folder
        :file-path (str root "/file/")

  [asset]
  (let [stream (content asset)]
    (if stream
      (-> (ring/response stream)
        (ring/content-type (get-content-type asset))))))

(defn wrap-exception-handling

  [handler]
  ; Just a placeholder for now
  handler)

(defn- now-plus-ten-years
  "Returns a string representation of the current Date plus ten years, used for setting expiration date of assets."
  []
  (let [format (file-info/make-http-format)]
    (->>
      (doto (Calendar/getInstance)
        (.add Calendar/YEAR 10))
      .getTime
      (.format format))))

(defn initialize-assets
  "Initializes asset handling for Cascade. This sets an application version (a value incorporated into URLs, which
