clojure / compojure / hiccup NullPointerException

时间:2011-08-28 16:54:54

标签: clojure compojure hiccup

我的堆栈跟踪不包含对我的代码的任何引用。我不知道如何开始找出可能出现的问题:

LazySeq.java:47 clojure.lang.LazySeq.sval
LazySeq.java:56 clojure.lang.LazySeq.seq
Cons.java:39    clojure.lang.Cons.next
RT.java:560 clojure.lang.RT.next
core.clj:61 clojure.core/next
core.clj:461    clojure.core/str$fn[fn]
core.clj:463    clojure.core/str
RestFn.java:140 clojure.lang.RestFn.applyTo
core.clj:540    clojure.core/apply
core.clj:90 hiccup.core/eval460$fn[fn]
MultiFn.java:163    clojure.lang.MultiFn.invoke
Var.java:365    clojure.lang.Var.invoke
stacktrace.clj:26   ring.middleware.stacktrace/html-ex-view
stacktrace.clj:40   ring.middleware.stacktrace/html-ex-response
stacktrace.clj:51   ring.middleware.stacktrace/ex-response
stacktrace.clj:61   ring.middleware.stacktrace/wrap-stacktrace$fn[fn]
reload_modified.clj:15  ring.middleware.reload-modified/wrap-reload-modified$fn[fn]
stacktrace.clj:59   ring.middleware.stacktrace/wrap-stacktrace$fn[fn]
jetty.clj:17    ring.adapter.jetty/proxy-handler$fn[fn]
(Unknown Source)        ring.adapter.jetty.proxy$org.mortbay.jetty.handler.AbstractHandler$0.handle
HandlerWrapper.java:152 org.mortbay.jetty.handler.HandlerWrapper.handle
Server.java:324 org.mortbay.jetty.Server.handle
HttpConnection.java:534 org.mortbay.jetty.HttpConnection.handleRequest
HttpConnection.java:879 org.mortbay.jetty.HttpConnection$RequestHandler.content
HttpParser.java:741 org.mortbay.jetty.HttpParser.parseNext
HttpParser.java:213 org.mortbay.jetty.HttpParser.parseAvailable
HttpConnection.java:403 org.mortbay.jetty.HttpConnection.handle
SocketConnector.java:228    org.mortbay.jetty.bio.SocketConnector$Connection.run
QueuedThreadPool.java:522   org.mortbay.thread.QueuedThreadPool$PoolThread.run

在表单提交后发生这种情况 - 控制器将记录写入数据库并重定向到页面:

(defn create-submit [& m]
  (let [p (model/create m)]
      (response/redirect (str "/post/" (:id p)))))

我在堆栈跟踪中看到打嗝,但此处没有页面渲染。浏览器仍指向原始页面,而不是重定向页面,因此我认为重定向永远不会发生。

想法?

编辑:

对于一些println,我已将其跟踪到模型/创建调用,这是调用clojureql来实现!新纪录。第一个println显示在控制台窗口中,第二个println不显示。

(defn create [m] 
    (let [p (new-post-from m)] 
        (println "about to add p to table " (:id p)) 
        (cql/conj! (cql/table :posts) p)
        (println "after adding p to table")
    p)) 

1 个答案:

答案 0 :(得分:4)

原因是我的路线定义看起来像这样:

(POST "/post/create/submit" (params :params) (post/create-submit))

我需要将params传递给create-submit调用。因为create-submit参数的定义是[& m],我想它并没有抱怨错误的参数数量。

校正: 而且模型/创建方法也在抛出,因为我没有为db.clj文件添加一个require,这是我cql/open-global调用的地方。

堆栈跟踪完全不明显 - 我希望它指向cql / conj下的某个位置!它试图建立连接的地方。相反,它指的是根本没有任何意义的打嗝。