From d73352f848b79224a94e531bb651897321064998 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 18 Apr 2017 16:35:38 -0400 Subject: initial Crypto Will use Ed25519 because it's from DJB and well regarded and in common use now. --- debug-me.hs | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'debug-me.hs') diff --git a/debug-me.hs b/debug-me.hs index 8ff38ed..7a51613 100644 --- a/debug-me.hs +++ b/debug-me.hs @@ -11,6 +11,7 @@ import Log import Graphviz import Replay import Session +import Crypto import Control.Concurrent import Control.Concurrent.Async @@ -332,9 +333,6 @@ isLegalEntered (Activity (Proto entered) hp sig) (Backlog (lastseen :| bl)) -- Developer should never send Rejected. isLegalEntered (Activity (Rejected _) _ _) _ = False -dummySignature :: Signature -dummySignature = Signature mempty - -- | Temporary hack while user and developer share a process. protocolError :: String -> IO a protocolError e = do -- cgit v1.2.3