WIP: upgrade cardano-wallet package to work with new TransactionLayer

cardano-foundation · Jan 26, 2021 · 5a8dda5 · 5a8dda5
1 parent b4e1bf6
commit 5a8dda5
Show file tree

Hide file tree

Showing 2 changed files with 207 additions and 162 deletions.
diff --git a/lib/shelley/src/Cardano/Wallet/Shelley/Api/Server.hs b/lib/shelley/src/Cardano/Wallet/Shelley/Api/Server.hs
@@ -271,7 +271,7 @@ server byron icarus shelley spl ntp =
 
     shelleyMigrations :: Server (ShelleyMigrations n)
     shelleyMigrations =
-             getMigrationInfo @_ @_ @n shelley
+             getMigrationInfo @_ @_ shelley
         :<|> migrateWallet shelley
 
     stakePools :: Server (StakePools n ApiStakePool)
@@ -410,8 +410,8 @@ server byron icarus shelley spl ntp =
     byronMigrations :: Server (ByronMigrations n)
     byronMigrations =
              (\wid -> withLegacyLayer wid
-                (byron , getMigrationInfo @_ @_ @n byron wid)
-                (icarus, getMigrationInfo @_ @_ @n icarus wid)
+                (byron , getMigrationInfo @_ @_ byron wid)
+                (icarus, getMigrationInfo @_ @_ icarus wid)
              )
         :<|> (\wid m -> withLegacyLayer wid
                 (byron , migrateWallet byron wid m)