obscure shard timestamps

1 files changed, 1 insertions, 0 deletions

diff --git a/keysafe.hs b/keysafe.hs
index d73ff61..02dc18a 100644
--- a/keysafe.hs
+++ b/keysafe.hs
@@ -30,6 +30,7 @@ storedemo = do
 	let sis = shardIdents tunables name keyid
 	shards <- genShards esk tunables
 	print =<< mapM (uncurry (storeShard localFiles)) (zip (getIdents sis) shards)
+	print =<< obscureShards localFiles
   where
 	password = Password "correct horse battery staple"
 	name = Name "bar"