parent
d6fd77697d
commit
0ce1e18581
|
@ -29,9 +29,7 @@
|
||||||
:status "open"})
|
:status "open"})
|
||||||
(realm/sorted :added :desc)
|
(realm/sorted :added :desc)
|
||||||
(realm/collection->map))
|
(realm/collection->map))
|
||||||
requests' (->> requests
|
requests' (map #(update % :type keyword) requests)]
|
||||||
(map #(update % :type keyword))
|
|
||||||
(into '()))]
|
|
||||||
(assoc-in db [:chats chat-id' :requests] requests')))
|
(assoc-in db [:chats chat-id' :requests] requests')))
|
||||||
|
|
||||||
(register-handler :add-request
|
(register-handler :add-request
|
||||||
|
|
|
@ -37,8 +37,11 @@
|
||||||
[text {:style st/request-message-info}
|
[text {:style st/request-message-info}
|
||||||
"By console, today at 14:50"]]]])
|
"By console, today at 14:50"]]]])
|
||||||
|
|
||||||
(defn render-request-row [row _ _]
|
(defn render-request-row
|
||||||
(list-item [request-item row]))
|
[{:keys [chat-id message-id] :as row} _ _]
|
||||||
|
(list-item
|
||||||
|
^{:key [chat-id message-id]}
|
||||||
|
[request-item row]))
|
||||||
|
|
||||||
(defn suggestion-list-item
|
(defn suggestion-list-item
|
||||||
[[command {:keys [description]
|
[[command {:keys [description]
|
||||||
|
|
Loading…
Reference in New Issue