diff options
Diffstat (limited to 'Assistant/Pairing.hs')
-rw-r--r-- | Assistant/Pairing.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Assistant/Pairing.hs b/Assistant/Pairing.hs index a157e28f8..f328bf9e0 100644 --- a/Assistant/Pairing.hs +++ b/Assistant/Pairing.hs @@ -36,8 +36,10 @@ data PairMsg data PairData = PairData -- uname -n output, not a full domain name { remoteHostName :: Maybe HostName + -- the address is included so that it can be verified, avoiding spoofing , remoteAddress :: SomeAddr , remoteUserName :: UserName + , remoteDirectory :: FilePath , sshPubKey :: SshPubKey } deriving (Eq, Read, Show) |