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/Ssh.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/Ssh.hs')
| -rw-r--r-- | Assistant/Ssh.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Assistant/Ssh.hs b/Assistant/Ssh.hs index eefc2a2e2..47c2cb48a 100644 --- a/Assistant/Ssh.hs +++ b/Assistant/Ssh.hs @@ -32,6 +32,9 @@ data SshKeyPair = SshKeyPair , sshPrivKey :: String } +instance Show SshKeyPair where + show = sshPubKey + type SshPubKey = String {- ssh -ofoo=bar command-line option -} |