奇怪的超级战争行为

Question

我正在为我的测试 webapp 执行 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)

With:

(:require test.routes)

And call

 (defservice test.routes/app-routes)

在 servlet.clj 中，WAR 编译良好，并且在 tomcat 中完美运行。我的代码中是否存在一些我看不到的错误？为什么我需要调用 test.routes/... 而不仅仅是 paths/...？

Answer 1

您需要将其放入向量中：

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