diff options
Diffstat (limited to 'Network/DNS/Response.hs')
| -rw-r--r-- | Network/DNS/Response.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Network/DNS/Response.hs b/Network/DNS/Response.hs index abcb8ba..523335b 100644 --- a/Network/DNS/Response.hs +++ b/Network/DNS/Response.hs @@ -15,7 +15,7 @@ import Data.ByteString (ByteString) import qualified Data.ByteString.Lazy as BL runDNSFormat :: BL.ByteString -> Either String (DNSFormat, PState) -runDNSFormat bs = runSGet decodeResponse bs +runDNSFormat = runSGet decodeResponse runDNSFormat_ :: BL.ByteString -> Either String DNSFormat runDNSFormat_ bs = fst <$> runDNSFormat bs |