diff options
Diffstat (limited to 'src/Network/Tox/Onion/Transport.hs')
-rw-r--r-- | src/Network/Tox/Onion/Transport.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Network/Tox/Onion/Transport.hs b/src/Network/Tox/Onion/Transport.hs index 3d8a9e93..0cb03718 100644 --- a/src/Network/Tox/Onion/Transport.hs +++ b/src/Network/Tox/Onion/Transport.hs | |||
@@ -105,7 +105,7 @@ putOnionAsymm typ p a = put typ >> p >> putAliasedAsymm a | |||
105 | 105 | ||
106 | data OnionMessage (f :: * -> *) | 106 | data OnionMessage (f :: * -> *) |
107 | = OnionAnnounce (Asymm (f (AnnounceRequest,Nonce8))) | 107 | = OnionAnnounce (Asymm (f (AnnounceRequest,Nonce8))) |
108 | | OnionAnnounceResponse Nonce8 Nonce24 (f AnnounceResponse) | 108 | | OnionAnnounceResponse Nonce8 Nonce24 (f AnnounceResponse) -- XXX: Why is Nonce8 transmitted in the clear? |
109 | | OnionToRoute PublicKey (Asymm (Encrypted DataToRoute)) -- destination key, aliased Asymm | 109 | | OnionToRoute PublicKey (Asymm (Encrypted DataToRoute)) -- destination key, aliased Asymm |
110 | | OnionToRouteResponse (Asymm (Encrypted DataToRoute)) | 110 | | OnionToRouteResponse (Asymm (Encrypted DataToRoute)) |
111 | 111 | ||