diff options
Diffstat (limited to 'Utility/SRV.hs')
-rw-r--r-- | Utility/SRV.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/SRV.hs b/Utility/SRV.hs index f1671758e..1b86aeb76 100644 --- a/Utility/SRV.hs +++ b/Utility/SRV.hs @@ -74,7 +74,7 @@ lookupSRV (SRV srv) = do maybe [] use r #endif where - use = orderHosts . map tohosts + use = orderHosts . map tohosts tohosts (priority, weight, port, hostname) = ( (priority, weight) , (B8.toString hostname, PortNumber $ fromIntegral port) |