Minor fixes to issue-experts' screens.
This commit is contained in:
parent
039b0eef3c
commit
028022fd75
|
@ -1,7 +1,8 @@
|
||||||
(ns^{:doc "Render web pages using Selmer templating markup."
|
(ns^{:doc "Render web pages using Selmer templating markup."
|
||||||
:author "Simon Brooke"}
|
:author "Simon Brooke"}
|
||||||
youyesyet.layout
|
youyesyet.layout
|
||||||
(:require [adl-support.tags :as tags]
|
(:require [adl-support.filters :refer :all]
|
||||||
|
[adl-support.tags :as tags]
|
||||||
[clojure.string :refer [lower-case]]
|
[clojure.string :refer [lower-case]]
|
||||||
[clojure.tools.logging :as log]
|
[clojure.tools.logging :as log]
|
||||||
[markdown.core :refer [md-to-html-string]]
|
[markdown.core :refer [md-to-html-string]]
|
||||||
|
|
|
@ -50,10 +50,7 @@
|
||||||
|
|
||||||
(defn followup-request-page [request]
|
(defn followup-request-page [request]
|
||||||
(let
|
(let
|
||||||
[params (support/massage-params
|
[params (support/massage-params request)
|
||||||
(keywordize-keys (:params request))
|
|
||||||
(keywordize-keys (:form-params request))
|
|
||||||
#{:id})
|
|
||||||
id (:id (keywordize-keys params))
|
id (:id (keywordize-keys params))
|
||||||
record (db/get-followuprequest db/*db* {:id id})
|
record (db/get-followuprequest db/*db* {:id id})
|
||||||
elector (if
|
elector (if
|
||||||
|
|
Loading…
Reference in a new issue