[Fix] Profile colour in "Jump to" and "View profile" buttons (#16538)

This commit fixes the profile colour in the following screens:

- "View Profile" button on the "Add a contact" page
- "Jump to" button inside the chat
- "Jump to" button in the "Community Overview" screen

Signed-off-by: Mohamed Javid <19339952+smohamedjavid@users.noreply.github.com>
This commit is contained in:
Mohamed Javid 2023-07-10 21:14:31 +08:00 committed by GitHub
parent 728d9d01c5
commit 919fbf2091
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
4 changed files with 23 additions and 17 deletions

View File

@ -167,8 +167,9 @@
colors/neutral-40)})
(defn button-view-profile
[state]
[state customization-color]
{:type :primary
:customization-color customization-color
:size 40
:width 335
:style {:margin-top 24

View File

@ -47,6 +47,7 @@
(clipboard/get-string #(reset! clipboard %))
(let [{:keys [input scanned public-key ens state msg]}
(rf/sub [:contacts/new-identity])
customization-color (rf/sub [:profile/customization-color])
invalid? (= state :invalid)
show-paste-button? (and (not (string/blank? @clipboard))
(string/blank? @default-value)
@ -107,7 +108,7 @@
(when (= state :valid)
[found-contact public-key])]
[quo/button
(merge (style/button-view-profile state)
(merge (style/button-view-profile state customization-color)
{:on-press
(fn []
(reset! clipboard nil)

View File

@ -27,7 +27,8 @@
(defn- f-shell-button
[{:keys [maximized? focused?]} {:keys [height]} {:keys [reply edit]}]
(let [insets (safe-area/get-insets)
(let [customization-color (rf/sub [:profile/customization-color])
insets (safe-area/get-insets)
extra-height (utils/calc-top-content-height reply edit)
neg-y (utils/calc-shell-neg-y insets maximized? extra-height)
y-container (reanimated/use-shared-value neg-y)
@ -49,6 +50,7 @@
{:on-press (fn []
(rf/dispatch [:chat/close true])
(rf/dispatch [:shell/navigate-to-jump-to]))
:customization-color customization-color
:label (i18n/label :t/jump-to)
:style {:align-self :center}}} {}]]
[quo/floating-shell-button

View File

@ -356,11 +356,13 @@
(defn overview
[id]
(let [id (or id (rf/sub [:get-screen-params :community-overview]))]
(let [id (or id (rf/sub [:get-screen-params :community-overview]))
customization-color (rf/sub [:profile/customization-color])]
[rn/view {:style style/community-overview-container}
[community-card-page-view id]
[floating-shell-button/floating-shell-button
{:jump-to {:on-press #(rf/dispatch [:shell/navigate-to-jump-to])
:customization-color customization-color
:label (i18n/label :t/jump-to)}}
{:position :absolute
:bottom 41}]]))