.gitmodules

@@ -1,4 +1,4 @@
 [submodule "zcash-haskell"]
 	path = zcash-haskell
 	url = https://git.vergara.tech/Vergara_Tech/zcash-haskell.git
-	branch = milestone2
+	branch = dev040

CHANGELOG.md

@@ -5,29 +5,6 @@ All notable changes to this project will be documented in this file.
 The format is based on [Keep a Changelog](https://keepachangelog.com/en/1.0.0/),
 and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0.html).
 
-## [0.5.2.0-beta]
-
-### Changed
-
-- Update to `zcash-haskell-0.6.2.0` to increase performance of transaction creation
-
-### Fixed
-
-- Truncation of transaction ID when displaying a successfully sent transaction
-- Missing command in menu for Send
-
-## [0.5.1.1-beta.1]
-
-### Changed
-
-- Installation instructions in README
-
-## [0.5.1.1-beta]
-
-### Added
-
-- Implement CLI changes to send transactions
-
 ## [0.5.0.0]
 
 ### Added

src/Zenith/CLI.hs

@@ -213,7 +213,6 @@ drawUI s = [splashDialog s, helpDialog s, displayDialog s, inputDialog s, ui s]
            [ capCommand "W" "allets"
            , capCommand "A" "ccounts"
            , capCommand "V" "iew address"
-           , capCommand "S" "end Tx"
            , capCommand "Q" "uit"
            , str $ show (st ^. timer)
            ])
@@ -348,7 +347,7 @@ drawUI s = [splashDialog s, helpDialog s, displayDialog s, inputDialog s, ui s]
                   (str
                      " _____          _ _   _     \n|__  /___ _ __ (_) |_| |__\n  / // _ \\ '_ \\| | __| '_ \\\n / /|  __/ | | | | |_| | | |\n/____\\___|_| |_|_|\\__|_| |_|") <=>
                 C.hCenter
-                  (withAttr titleAttr (str "Zcash Wallet v0.5.2.0-beta")) <=>
+                  (withAttr titleAttr (str "Zcash Wallet v0.5.1.0-beta")) <=>
                 C.hCenter (withAttr blinkAttr $ str "Press any key..."))
         else emptyWidget
     capCommand :: String -> String -> Widget Name
@@ -459,11 +458,7 @@ drawUI s = [splashDialog s, helpDialog s, displayDialog s, inputDialog s, ui s]
           withBorderStyle unicodeBold $
           D.renderDialog
             (D.dialog (Just $ txt "Sending Transaction") Nothing 50)
-            (padAll
-               1
-               (strWrapWith
-                  (WrapSettings False True NoFill FillAfterFirst)
-                  (st ^. msg)))
+            (padAll 1 (str $ st ^. msg))
         BlankDisplay -> emptyWidget
 
 mkInputForm :: DialogInput -> Form DialogInput e Name

zcash-haskell

@@ -1 +1 @@
-Subproject commit 90c8a7c3028bd6836dea5655221277a25d457653
+Subproject commit 9dddb42bb3ab78ed0c4d44efb00960ac112c2ce6

zenith.cabal

@@ -1,6 +1,6 @@
 cabal-version:    3.0
 name:             zenith
-version:          0.5.2.0-beta
+version:          0.5.1.0-beta
 license:          MIT
 license-file:     LICENSE
 author:           Rene Vergara