diff options
Diffstat (limited to 'main')
| -rw-r--r-- | main/Test.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/main/Test.hs b/main/Test.hs index 01570ea..1e1546c 100644 --- a/main/Test.hs +++ b/main/Test.hs @@ -615,7 +615,11 @@ cmdCreateIdentity = do , lsOther = [] } initTestHead h - cmdOut $ unwords [ "create-identity-done", "ref", show $ refDigest $ storedRef $ lsIdentity $ headObject h ] + cmdOut $ unwords + [ "create-identity-done" + , "ref", show $ refDigest $ storedRef $ eiddStoredBase $ lsIdentity $ headObject h + , "extref", show $ refDigest $ storedRef $ lsIdentity $ headObject h + ] cmdIdentityInfo :: Command cmdIdentityInfo = do |