testing GenVestedKey

rmourey26 · rmourey26 · commit d761af7abefc · 2021-10-23T11:37:58.000-04:00
diff --git a/bcc-cli/src/Bcc/CLI/Sophie/Run/Genesis.hs b/bcc-cli/src/Bcc/CLI/Sophie/Run/Genesis.hs
@@ -380,11 +380,11 @@ runGenesisVerKey (VerificationKeyFile vkeyPath) (SigningKeyFile skeyPath) = do
         AGenesisUTxOKey           vk -> writeFileTextEnvelope vkeyPath Nothing vk
 
 data SomeGenesisKey f
-     = AGenesisKey         (f GenesisKey)
-     | AGenesisDelegateKey (f GenesisDelegateKey)
-     | AGenesisVestedKey    (f VestedKey)
-     | AGenesisVestedDelegateKey (f VestedDelegateKey)
-     | AGenesisUTxOKey     (f GenesisUTxOKey)
+     = AGenesisKey               (f GenesisKey)
+     | AGenesisDelegateKey       (f GenesisDelegateKey)
+     | AGenesisVestedKey         (f GenesisVestedKey)
+     | AGenesisVestedDelegateKey (f GenesisVestedDelegateKey)
+     | AGenesisUTxOKey           (f GenesisUTxOKey)
 
 
 runGenesisTxIn :: VerificationKeyFile -> NetworkId -> Maybe OutputFile
