diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/mulk/benki/book_marx.clj | 2 | ||||
-rw-r--r-- | src/mulk/benki/util.clj | 1 |
2 files changed, 2 insertions, 1 deletions
diff --git a/src/mulk/benki/book_marx.clj b/src/mulk/benki/book_marx.clj index 873bef4..4dd328e 100644 --- a/src/mulk/benki/book_marx.clj +++ b/src/mulk/benki/book_marx.clj @@ -156,7 +156,7 @@ (get-in (request/ring-request) [:headers "Referer"]) uri)] (layout bookmarx-submission-page "Submit New Bookmark" - [:form {:method "POST"} + [:form {:method "POST", :action (link :marx :submit)} [:table [:tr [:td "URI: "] [:td [:input {:type "text", :name "uri", :size 100, :value uri}]]] [:tr [:td "Title: "] [:td [:input {:type "text", :name "title", :size 100, :value title}]]] diff --git a/src/mulk/benki/util.clj b/src/mulk/benki/util.clj index a9c7ef2..3600f9e 100644 --- a/src/mulk/benki/util.clj +++ b/src/mulk/benki/util.clj @@ -50,6 +50,7 @@ (match [(vec args)] [[:login]] (fresolve "/login") [[:marx]] (fresolve "/marx") + [[:marx :submit]] (fresolve "/marx/submit") [[:marx id]] (fresolve "/marx/~a" id) [[:wiki title & xs]] (fresolve "/wiki/~a~@[~a~]" title (first xs)) )) |