add checksum to encrypted data

Needed to verify decryption puzzles

1 files changed, 0 insertions, 3 deletions

diff --git a/keysafe.hs b/keysafe.hs
index 0f8cf51..a197620 100644
--- a/keysafe.hs
+++ b/keysafe.hs
@@ -56,9 +56,6 @@ retrievedemo = do
 		putStr "."
 		hFlush stdout
 		case decrypt kek esk of
-			-- TODO: verify checksum to avoid false positives
-			-- (It's working without it only because the
-			-- decryption puzzle is currently disabled.)
 			Just (SecretKey sk) -> print sk
 			Nothing -> go esk rest