     (require \"modules/html/init.clj\")"
   [& modules]
   (doseq m modules
-    (require (str (file "./modules" (str m) "init.clj")))))
+    (require (str (file "modules" (str m) "init.clj")))))

(clojure/refer 'clojure)

(import '(javax.servlet.http HttpServlet))
(import '(java.io FileReader PushbackReader))

;;;;; General-use functions ;;;;;


       (refer '~'compojure)))

(def #^{:private true}
  *loaded-paths* #{})

(defn require
  "Load the file if and only if it has not been loaded previously."
  [file]
  (let [path (. (new File file) (getCanonicalPath))]
    (when-not (contains? *loaded-paths* path)
      (def *loaded-paths*
        (conj *loaded-paths* path))
      (load-file path)
      true)))

(defmacro return
  "A do block that will always return the argument x."
