Recent commit got amended accidentially to include this typo. Argh. It
was fine, then I tweakd the commit message and accidentially staged this
breakage.
This commit is contained in:
Joey Hess 2022-06-23 13:54:34 -04:00
parent 2265d9dad7
commit d137bd4c29
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

@ -30,7 +30,7 @@ import Prelude
extractIPAddress :: SockAddr -> Maybe String
extractIPAddress (SockAddrInet _ ipv4) =
let (a,b,c,d) = hostAddressToTuple ipv4
in Just $ tintercalate "." [conv a, conv b, conv c, conv d]
in Just $ intercalate "." [conv a, conv b, conv c, conv d]
where
conv a
| show x == show b12 = conv a