From bde5cce1951823028d46f4bb6180e3d3bf327999 Mon Sep 17 00:00:00 2001
From: Jonathan Knowles <jonathan.knowles@iohk.io>
Date: Fri, 12 Jul 2019 08:06:36 +0000
Subject: [PATCH] Add `listTransactions` function to `WalletClient`.

---
 lib/cli/src/Cardano/CLI.hs | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/lib/cli/src/Cardano/CLI.hs b/lib/cli/src/Cardano/CLI.hs
index 4b126b821e2..342e98e3f6c 100644
--- a/lib/cli/src/Cardano/CLI.hs
+++ b/lib/cli/src/Cardano/CLI.hs
@@ -95,7 +95,7 @@ import Cardano.Launcher
     , setupStateDir
     )
 import Cardano.Wallet.Api
-    ( Api )
+    ( Api, Iso8601Range (..) )
 import Cardano.Wallet.Api.Server
     ( Listen (..) )
 import Cardano.Wallet.Api.Types
@@ -778,6 +778,10 @@ data WalletClient t = WalletClient
         :: ApiT WalletId
         -> WalletPutPassphraseData
         -> ClientM NoContent
+    , listTransactions
+        :: ApiT WalletId
+        -> Maybe (Iso8601Range "inserted-at")
+        -> ClientM [ApiTransaction t]
     , postTransaction
         :: ApiT WalletId
         -> PostTransactionData t
@@ -818,6 +822,7 @@ walletClient =
             , postWallet = _postWallet
             , putWallet = _putWallet
             , putWalletPassphrase = _putWalletPassphrase
+            , listTransactions = _listTransactions
             , postTransaction = _postTransaction
             , postTransactionFee = _postTransactionFee
             }