Skip to content

Commit

Permalink
Fix #23 Grey area between staging and text input
Browse files Browse the repository at this point in the history
Former-commit-id: 6c40a2d
  • Loading branch information
virvar committed Apr 25, 2016
1 parent a714cc9 commit 8df4d5a
Show file tree
Hide file tree
Showing 3 changed files with 10 additions and 8 deletions.
6 changes: 4 additions & 2 deletions src/syng_im/components/chat/chat_message_new.cljs
Original file line number Diff line number Diff line change
Expand Up @@ -7,6 +7,7 @@
text
text-input
touchable-highlight]]
[syng-im.components.styles :refer [color-white]]
[syng-im.components.chat.plain-message-input :refer [plain-message-input-view]]
[syng-im.components.chat.input.simple-command :refer [simple-command-input-view]]
[syng-im.components.chat.input.phone :refer [phone-input-view]]
Expand All @@ -23,7 +24,7 @@
[simple-command-staged-view stage-command])

(defn staged-commands-view [staged-commands]
[view {:style {:marginBottom 12}}
[view {}
(for [command staged-commands]
^{:key command} [staged-command-view command])])

Expand All @@ -45,7 +46,8 @@
(fn []
(let [command @command-atom
staged-commands @staged-commands-atom]
[view
[view {:style {:backgroundColor color-white
:elevation 4}}
(when (and staged-commands (< 0 (count staged-commands)))
[staged-commands-view staged-commands])
(if command
Expand Down
3 changes: 1 addition & 2 deletions src/syng_im/components/chat/plain_message_input.cljs
Original file line number Diff line number Diff line change
Expand Up @@ -39,8 +39,7 @@
[suggestions-view]
[view {:style {:flexDirection "row"
:height 56
:backgroundColor color-white
:elevation 4}}
:backgroundColor color-white}}
[image {:source res/icon-list
:style {:marginTop 22
:marginRight 6
Expand Down
9 changes: 5 additions & 4 deletions src/syng_im/components/chat/suggestions.cljs
Original file line number Diff line number Diff line change
Expand Up @@ -10,7 +10,8 @@
touchable-highlight
list-view
list-item]]
[syng-im.components.styles :refer [font]]
[syng-im.components.styles :refer [font
color-white]]
[syng-im.utils.listview :refer [to-datasource]]
[syng-im.utils.utils :refer [log toast http-post]]
[syng-im.utils.logging :as log]))
Expand All @@ -25,7 +26,7 @@
:marginVertical 1
:marginHorizontal 0
:height 40
:backgroundColor "white"}}
:backgroundColor color-white}}
[view {:style {:flexDirection "column"
:position "absolute"
:top 10
Expand All @@ -36,7 +37,7 @@
:marginHorizontal 10
:fontSize 14
:fontFamily font
:color "white"}}
:color color-white}}
(:text suggestion)]]
[text {:style {:flex 1
:position "absolute"
Expand All @@ -60,7 +61,7 @@
:marginVertical 1
:marginHorizontal 0
:height (min 105 (* 42 (count suggestions)))
:backgroundColor "#eef2f5"
:backgroundColor color-white
:borderRadius 5}}
[list-view {:dataSource (to-datasource suggestions)
:renderRow render-row
Expand Down

0 comments on commit 8df4d5a

Please sign in to comment.