diff --git a/ADNS/Endian.hs b/ADNS/Endian.hs
--- a/ADNS/Endian.hs
+++ b/ADNS/Endian.hs
@@ -13,6 +13,7 @@
 module ADNS.Endian ( Endian(..), endian, readWord32, readWord16 ) where
 
 import Foreign
+import System.IO.Unsafe
 
 -- |Signify the system's native byte order according to
 -- significance of bytes from low addresses to high addresses.
@@ -28,7 +29,7 @@
 {-# NOINLINE endian #-}
 endian :: Endian
 endian =
-  unsafePerformIO $
+  System.IO.Unsafe.unsafePerformIO $
     allocaArray (sizeOf (undefined :: Word32)) $ \p -> do
       let val = 0x01020304 :: Word32
       poke p val
diff --git a/ADNS/Resolver.hs b/ADNS/Resolver.hs
--- a/ADNS/Resolver.hs
+++ b/ADNS/Resolver.hs
@@ -55,9 +55,7 @@
 resolveA :: Resolver -> HostName -> IO (Either Status [HostAddress])
 resolveA resolver x = do
   Answer rc _ _ _ rs  <- resolver x A [] >>= takeMVar
-  if rc /= sOK
-     then return (Left rc)
-     else return (Right [ addr | RRA (RRAddr addr) <- rs  ])
+  return (if rc /= sOK then Left rc else Right [addr | RRA (RRAddr addr) <- rs])
 
 -- |Resolve a hostname's 'SRV' records.
 
@@ -82,9 +80,7 @@
 resolvePTR :: Resolver -> HostAddress -> IO (Either Status [HostName])
 resolvePTR resolver x = do
   Answer rc _ _ _ rs  <- resolver (toPTR x) PTR [] >>= takeMVar
-  if rc /= sOK
-     then return (Left rc)
-     else return (Right [ addr | RRPTR addr <- rs  ])
+  return (if rc /= sOK then Left rc else Right [ addr | RRPTR addr <- rs ])
 
 -- |Resolve the mail exchangers for a hostname. The returned
 -- list may contain more than one entry per hostname, in
diff --git a/hsdns.cabal b/hsdns.cabal
--- a/hsdns.cabal
+++ b/hsdns.cabal
@@ -1,12 +1,13 @@
 Name:                   hsdns
-Version:                1.5
-Copyright:              (c) 2004-2010 Peter Simons
-License:                LGPL
+Version:                1.6
+Copyright:              Peter Simons
+License:                LGPL-3
 License-File:           COPYING.LESSER
 Author:                 Peter Simons <simons@cryp.to>, Lutz Donnerhacke <lutz@iks-jena.de>,
                         Григорий Холомьёв <omever@gmail.com>, Evan Rinehart <ebr@sciresearch.com>
 Maintainer:             Peter Simons <simons@cryp.to>
-Homepage:               http://gitorious.org/hsdns
+Homepage:               http://github.com/peti/hsdns
+Bug-Reports:            http://github.com/peti/hsdns/issues
 Category:               Foreign, Network
 Synopsis:               Asynchronous DNS Resolver
 Description:            This library provides an asynchronous DNS resolver on top
@@ -31,7 +32,7 @@
                         > OK: www.example.com <-> 192.0.32.10
 Cabal-Version:          >= 1.6
 Build-Type:             Simple
-Tested-With:            GHC == 6.12.3
+Tested-With:            GHC >= 6.12.3 && <= 7.6.2
 
 Extra-Source-Files:     example/adns-reverse-lookup.hs
                         example/adns-srv-test.hs
@@ -39,7 +40,7 @@
 
 Source-Repository head
   Type:                 git
-  Location:             git://gitorious.org/hsdns/mainline.git
+  Location:             git://github.com/peti/hsdns.git
 
 Library
   Build-Depends:        base >= 3 && < 5, network, containers