diff --git a/marlowe-dashboard-client/src/Capability/Marlowe.purs b/marlowe-dashboard-client/src/Capability/Marlowe.purs index c3dc0b2590b..8d29ff682c2 100644 --- a/marlowe-dashboard-client/src/Capability/Marlowe.purs +++ b/marlowe-dashboard-client/src/Capability/Marlowe.purs @@ -28,8 +28,8 @@ import Capability.MarloweStorage (class ManageMarloweStorage, addAssets, getCont import Capability.PlutusApps.MarloweApp as MarloweApp import Capability.Wallet (class ManageWallet) import Capability.Wallet (createWallet, getWalletInfo, getWalletTotalFunds) as Wallet -import Contacts.Lenses (_companionAppId, _marloweAppId, _pubKey, _pubKeyHash, _wallet, _walletInfo) -import Contacts.Types (PubKeyHash(..), Wallet(..), WalletDetails, WalletInfo(..)) +import Contacts.Lenses (_companionAppId, _marloweAppId, _pubKeyHash, _wallet, _walletInfo) +import Contacts.Types (Wallet(..), WalletDetails, WalletInfo(..)) import Control.Monad.Except (ExceptT(..), except, lift, mapExceptT, runExcept, runExceptT, withExceptT) import Control.Monad.Reader (asks) import Control.Monad.Reader.Class (ask) diff --git a/marlowe-dashboard-client/src/Capability/PlutusApps/MarloweApp.purs b/marlowe-dashboard-client/src/Capability/PlutusApps/MarloweApp.purs index 1cdda1d4507..09c3a4e0825 100644 --- a/marlowe-dashboard-client/src/Capability/PlutusApps/MarloweApp.purs +++ b/marlowe-dashboard-client/src/Capability/PlutusApps/MarloweApp.purs @@ -20,7 +20,6 @@ import Capability.Contract (class ManageContract) import Capability.Contract (invokeEndpoint) as Contract import Capability.PlutusApps.MarloweApp.Lenses (_applyInputs, _create, _marloweAppEndpointMutex, _redeem, _requests) import Capability.PlutusApps.MarloweApp.Types (EndpointMutex, LastResult(..), MarloweAppEndpointMutexEnv) -import Contacts.Types (PubKeyHash) import Control.Monad.Reader (class MonadAsk, asks) import Data.Array (findMap, take, (:)) import Data.Foldable (elem)