diff options
| author | Roman Smrž <roman.smrz@seznam.cz> | 2022-07-25 20:57:39 +0200 |
|---|---|---|
| committer | Roman Smrž <roman.smrz@seznam.cz> | 2022-07-26 21:55:45 +0200 |
| commit | 1f961a5a882d2626f0c6be28b03d86b8c257a855 (patch) | |
| tree | bbd7cfd41b82ab1c092ae21220f7a67543b15174 /src/Contact.hs | |
| parent | 6c13b1285605020bb3c510dd1862d2d8d9828337 (diff) | |
Pairing failure reason
Diffstat (limited to 'src/Contact.hs')
| -rw-r--r-- | src/Contact.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Contact.hs b/src/Contact.hs index 1dc926e..4e2cb17 100644 --- a/src/Contact.hs +++ b/src/Contact.hs @@ -139,7 +139,7 @@ instance PairingResult ContactAccepted where , pairingHookRejected = do svcPrint $ "Contact rejected by peer" - , pairingHookFailed = do + , pairingHookFailed = \_ -> do svcPrint $ "Contact failed" } |