奇怪的lein uberwar行为

时间:2011-06-06 11:53:37

标签: clojure war compojure

我正在为我的测试网络应用程序执行lein uberwar,我收到以下奇怪的错误:

Exception in thread "main" java.lang.ClassCastException: java.lang.Boolean cannot be cast to clojure.lang.Symbol (servlet.clj:1)

servlet.clj包含以下内容:

(ns test.servlet
  (:use ring.util.servlet)
  (:require test.routes :as routes)
  (:gen-class :extends javax.servlet.http.HttpServlet))

(defservice routes/app-routes)

test.routes文件包含:

(ns test.routes
  (:use compojure.core)
  (:require [compojure.route :as route]
            [compojure.handler :as handler]))


(defroutes app-routes
  (GET "/" [] {:status 200
               :headers {"Content-Type" "text/html"}
               :body "<h1>Hello World</h1>"})
  (route/files "/" {:root "static"})
  (ANY "/:s" [s] (str "page-not-found" s)

;; For lein ring-server
;(def test-handler
;  (handler/site app-routes))

奇怪的是,如果我换行

(:require test.routes :as routes)

使用:

(:require test.routes)

并致电

 (defservice test.routes/app-routes)

在servlet.clj中,WAR编译正常,并且它在tomcat中完美运行。我的代码中是否有一些我看不到的错误?为什么我需要调用test.routes / ...而不仅仅是路由/ ...?

1 个答案:

答案 0 :(得分:8)

你需要把它放在一个矢量中:

(:require [test.routes :as routes])