parent
5065dd6afb
commit
78e0cb86b8
|
@ -11,12 +11,15 @@
|
||||||
(dispatch [:unstage-command staged-command]))
|
(dispatch [:unstage-command staged-command]))
|
||||||
|
|
||||||
(defn simple-command-staged-view [staged-command]
|
(defn simple-command-staged-view [staged-command]
|
||||||
(let [command (:command staged-command)]
|
(let [{:keys [type name] :as command} (:command staged-command)]
|
||||||
[view st/staged-command-container
|
[view st/staged-command-container
|
||||||
[view st/staged-command-background
|
[view st/staged-command-background
|
||||||
[view st/staged-command-info-container
|
[view st/staged-command-info-container
|
||||||
[view (st/staged-command-text-container command)
|
[view (st/staged-command-text-container command)
|
||||||
[text {:style st/staged-command-text} (str "!" (:name command))]]
|
[text {:style st/staged-command-text}
|
||||||
|
(if (= :command type)
|
||||||
|
(str "!" name)
|
||||||
|
name)]]
|
||||||
[touchable-highlight {:style st/staged-command-cancel
|
[touchable-highlight {:style st/staged-command-cancel
|
||||||
:onPress #(cancel-command-input staged-command)}
|
:onPress #(cancel-command-input staged-command)}
|
||||||
[image {:source res/icon-close-gray
|
[image {:source res/icon-close-gray
|
||||||
|
|
Loading…
Reference in New Issue