   (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

  cascade
  "Core functions and macros used when implementing Cascade views"
  (:import
    [java.io File FileInputStream BufferedInputStream InputStream]
    [java.util Calendar Date])
  (:require
    [ring.util.response :as ring]
    [ring.middleware.file-info :as file-info])
  (:use
    [compojure core]
    [cascade dom]
