    ["-h" "--help" "Show help"]
    ["-H" "--host HOST" "Set host for listening socket" :default "localhost"]
    ["-r" "--root DIR" "Set document root directory" :default docroot-default]
+   ["-D" "--localdev" "Allow CORS from localhost" :default false]
    ["-d" "--database FILE" "Database to use" :default db-default]
    [nil "--logfile FILE" "Log file to use" :default logfile-default]
    [nil "--keyfile FILE" "Private key file to use (requires --certfile)"]


(def ^:private argspec
  [[nil "--no-serve" "Don't start web server" :id :serve :parse-fn not :default true]
   ["-p" "--port PORT" "Server port to listen on" :default 7222 :parse-fn #(Integer/parseInt %)]
   ["-l" "--load" "Load files into running server"]
   ["-x" "--delete" "Delete file from running server"]

      (wrap-params)
      (wrap-multipart-params {:store (byte-array-store)})
      (wrap-stacktrace-web)
      (wrap-access-control allow-hosts)
      (wrap-reload)
      (add-version-header)))

