Extra debug print when sending announce response.

1 files changed, 5 insertions, 5 deletions

diff --git a/examples/AliceBob.hs b/examples/AliceBob.hs
index a7ec26f1..529b92d5 100644
--- a/examples/AliceBob.hs
+++ b/examples/AliceBob.hs
@@ -4,6 +4,7 @@ module AliceBob
     , PublicKey
     , CryptoFailable(..)
     , secretKey
+    , publicKey
     , toPublic
     ) where
 
@@ -11,7 +12,6 @@ import Crypto.PubKey.Curve25519 (SecretKey,PublicKey,secretKey,publicKey,toPubli
 import Crypto.Error
 import Data.Word
 import Data.ByteString as B
-import qualified Data.ByteArray as BA
 
 
 alicesk_bytes :: [Word8]
@@ -27,10 +27,10 @@ CryptoPassed alicesk = secretKey $ B.pack alicesk_bytes
 
 alicepk_bytes :: [Word8]
 alicepk_bytes =
-    [ 0x85,0x20,0xf0,0x09,0x89,0x30,0xa7,0x54
-    , 0x74,0x8b,0x7d,0xdc,0xb4,0x3e,0xf7,0x5a
-    , 0x0d,0xbf,0x3a,0x0d,0x26,0x38,0x1a,0xf4
-    , 0xeb,0xa4,0xa9,0x8e,0xaa,0x9b,0x4e,0x6a
+    [0x85,0x20,0xf0,0x09,0x89,0x30,0xa7,0x54
+    ,0x74,0x8b,0x7d,0xdc,0xb4,0x3e,0xf7,0x5a
+    ,0x0d,0xbf,0x3a,0x0d,0x26,0x38,0x1a,0xf4
+    ,0xeb,0xa4,0xa9,0x8e,0xaa,0x9b,0x4e,0x6a
     ]
 
 alicepk :: PublicKey