From c9ad130bbe9569c739ddce35352505af2152cbc4 Mon Sep 17 00:00:00 2001
From: Parham <parhaamsaremi@gmail.com>
Date: Tue, 23 May 2023 17:18:00 +0330
Subject: [PATCH] Frontend.Maui: Color.Default equivalent for maui

Save previous assigned color and use instead of Color.Default.
This is needed because maui doesn't have Color.Default [1]. And
this commit is workaround for that.

[1] https://github.com/dotnet/Microsoft.Maui.Graphics/issues/57
---
 src/GWallet.Frontend.XF/SendPage.xaml.fs | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/src/GWallet.Frontend.XF/SendPage.xaml.fs b/src/GWallet.Frontend.XF/SendPage.xaml.fs
index 5c4eafda0..a0fa98fb7 100644
--- a/src/GWallet.Frontend.XF/SendPage.xaml.fs
+++ b/src/GWallet.Frontend.XF/SendPage.xaml.fs
@@ -69,7 +69,13 @@ type SendPage(account: IAccount, receivePage: Page, newReceivePageFunc: unit->Pa
     let transactionLayout = mainLayout.FindByName<StackLayout> "transactionLayout"
     let transactionLabel = mainLayout.FindByName<Label> "transactionLabel"
     let transactionEntry = mainLayout.FindByName<Entry> "transactionEntry"
+#if !XAMARIN
+    let defaultTransactionEntryTextColor = transactionEntry.TextColor
+#endif
     let amountToSendEntry = mainLayout.FindByName<Entry> "amountToSend"
+#if !XAMARIN
+    let defaultAmountToSendTextColor = amountToSendEntry.TextColor
+#endif
     let destinationAddressEntry = mainLayout.FindByName<Entry> "destinationAddressEntry"
     let allBalanceButton = mainLayout.FindByName<Button> "allBalance"
     let passwordEntry = mainLayout.FindByName<Entry> "passwordEntry"
@@ -457,6 +463,8 @@ type SendPage(account: IAccount, receivePage: Page, newReceivePageFunc: unit->Pa
                     MainThread.BeginInvokeOnMainThread(fun _ ->
 #if XAMARIN
                         transactionEntry.TextColor <- Color.Default
+#else
+                        transactionEntry.TextColor <- defaultTransactionEntryTextColor
 #endif
                         destinationAddressEntry.Text <- unsignedTransaction.Proposal.DestinationAddress
                         amountToSendEntry.Text <- unsignedTransaction.Proposal.Amount.ValueToSend.ToString()
@@ -484,6 +492,8 @@ type SendPage(account: IAccount, receivePage: Page, newReceivePageFunc: unit->Pa
                     MainThread.BeginInvokeOnMainThread(fun _ ->
 #if XAMARIN
                         transactionEntry.TextColor <- Color.Default
+#else
+                        transactionEntry.TextColor <- defaultTransactionEntryTextColor
 #endif
                         sendOrSignButton.IsEnabled <- true
                     )
@@ -538,6 +548,10 @@ type SendPage(account: IAccount, receivePage: Page, newReceivePageFunc: unit->Pa
                         MainThread.BeginInvokeOnMainThread(fun _ ->
                             amountToSend.TextColor <- Color.Default
                         )
+#else
+                        MainThread.BeginInvokeOnMainThread(fun _ ->
+                            amountToSend.TextColor <- defaultAmountToSendTextColor
+                        )
 #endif
                         match usdRate with
                         | NotFresh NotAvailable ->