ex eption handling added
This commit is contained in:
@@ -3,10 +3,10 @@ title = Free and Hassle-free Pastebin for Markdown Pages.
|
|||||||
name = NoteHub
|
name = NoteHub
|
||||||
new-page = New Page
|
new-page = New Page
|
||||||
|
|
||||||
status-404 = Nothing found.
|
status-404 = Not Found
|
||||||
status-400 = Bad Request.
|
status-400 = Bad Request
|
||||||
status-403 = Wrong Password.
|
status-403 = Forbidden
|
||||||
status-500 = OMG, Server Exploded.
|
status-500 = Internal Server Error
|
||||||
|
|
||||||
footer = Created by [@gravitydenier](http://twitter.com/gravitydenier) ♣ Available on [GitHub](https://github.com/chmllr/NoteHub)
|
footer = Created by [@gravitydenier](http://twitter.com/gravitydenier) ♣ Available on [GitHub](https://github.com/chmllr/NoteHub)
|
||||||
|
|
||||||
|
|||||||
@@ -15,7 +15,6 @@
|
|||||||
[notehub.storage :as storage]
|
[notehub.storage :as storage]
|
||||||
[cheshire.core :refer :all]))
|
[cheshire.core :refer :all]))
|
||||||
|
|
||||||
|
|
||||||
; Creates the main html layout
|
; Creates the main html layout
|
||||||
(defn layout
|
(defn layout
|
||||||
[title & content]
|
[title & content]
|
||||||
@@ -35,7 +34,6 @@
|
|||||||
(if-not (get-setting :dev-mode) (include-js "/js/google-analytics.js"))]
|
(if-not (get-setting :dev-mode) (include-js "/js/google-analytics.js"))]
|
||||||
[:body {:onload "onLoad()"} content]))
|
[:body {:onload "onLoad()"} content]))
|
||||||
|
|
||||||
|
|
||||||
(defn md-node
|
(defn md-node
|
||||||
"Returns an HTML element with a textarea inside
|
"Returns an HTML element with a textarea inside
|
||||||
containing the markdown text (to keep all chars unescaped)"
|
containing the markdown text (to keep all chars unescaped)"
|
||||||
@@ -91,7 +89,6 @@
|
|||||||
:body content})
|
:body content})
|
||||||
|
|
||||||
(defroutes api-routes
|
(defroutes api-routes
|
||||||
|
|
||||||
(GET "/" [] (layout (get-message :api-title)
|
(GET "/" [] (layout (get-message :api-title)
|
||||||
(md-node :article (slurp "API.md"))))
|
(md-node :article (slurp "API.md"))))
|
||||||
|
|
||||||
@@ -205,4 +202,12 @@
|
|||||||
(route/not-found (response 404)))
|
(route/not-found (response 404)))
|
||||||
|
|
||||||
(def app
|
(def app
|
||||||
(handler/site app-routes))
|
(let [handler (handler/site app-routes)]
|
||||||
|
(fn [request]
|
||||||
|
(if (get-setting :dev-mode)
|
||||||
|
(handler request)
|
||||||
|
(try (handler request)
|
||||||
|
(catch Exception e
|
||||||
|
(do
|
||||||
|
;TODO (log e)
|
||||||
|
(response 500))))))))
|
||||||
|
|||||||
Reference in New Issue
Block a user