diff options
author | Joey Hess <joey@kitenet.net> | 2012-09-11 15:06:29 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-09-11 15:09:00 -0400 |
commit | 2c1ceeeaf9a1cad8477e86e8c73c7f7a2de510ab (patch) | |
tree | 294a8fc2eda701d0936c77d3f27ac3448780ca24 /Assistant/Pairing.hs | |
parent | aace44454a8866e8dab251c2b9c98e2d48e3f071 (diff) |
pairing works!!
Finally.
Last bug fixes here: Send PairResp with same UUID in the PairReq.
Fix off-by-one in code that filters out our own pairing messages.
Also reworked the pairing alerts, which are still slightly buggy.
Diffstat (limited to 'Assistant/Pairing.hs')
-rw-r--r-- | Assistant/Pairing.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Assistant/Pairing.hs b/Assistant/Pairing.hs index c519dbd88..5d097ab7d 100644 --- a/Assistant/Pairing.hs +++ b/Assistant/Pairing.hs @@ -68,6 +68,7 @@ data PairingInProgress = PairingInProgress , inProgressPairData :: PairData , inProgressPairStage :: PairStage } + deriving (Show) data SomeAddr = IPv4Addr HostAddress | IPv6Addr HostAddress6 deriving (Ord, Eq, Read, Show) |