diff --git a/IPv6DB.cabal b/IPv6DB.cabal
--- a/IPv6DB.cabal
+++ b/IPv6DB.cabal
@@ -1,12 +1,12 @@
 name: IPv6DB
-version: 0.2.0
+version: 0.2.1
 cabal-version: >=1.10
 build-type: Simple
 license: BSD3
 license-file: LICENSE
 copyright: (c) 2017 - Michel Boucey
 maintainer: michel.boucey@cybervisible.fr
-homepage: https://github.com/MichelBoucey/IPv6DB
+homepage: http://ipv6db.cybervisible.com
 synopsis: A RESTful Web Service for IPv6-related data
 description:
     IPv6DB is a RESTful microservice using Redis as backend
@@ -49,12 +49,12 @@
         bytestring >=0.10.6 && <0.11,
         fast-logger >=2.4.8 && <2.5,
         IPv6Addr >=1.0.0 && <1.1.0,
-        IPv6DB >=0.2.0 && <0.3,
+        IPv6DB >=0.2.1 && <0.3,
         hedis >=0.9.4 && <0.10,
         http-types >=0.9.1 && <0.10,
         unordered-containers >=0.2.7.2 && <0.2.9,
         mtl >=2.2.1 && <2.3,
-        optparse-applicative >=0.12.1.0 && <0.14,
+        optparse-applicative >=0.12.1.0 && <0.15,
         text >=1.2.2 && <1.3,
         vector >=0.11.0.0 && <0.13,
         wai >=3.2.1 && <3.3,
@@ -75,7 +75,7 @@
         aeson >=0.11.2 && <1.3,
         hspec >=2.1.10 && <2.5,
         base >=4.8 && <5,
-        IPv6DB >=0.2.0 && <0.3,
+        IPv6DB >=0.2.1 && <0.3,
         vector >=0.11.0.0 && <0.13,
         http-client >=0.4.31.2 && <0.6,
         http-types >=0.9.1 && <0.10
diff --git a/app/Options.hs b/app/Options.hs
--- a/app/Options.hs
+++ b/app/Options.hs
@@ -20,7 +20,7 @@
 opts = info (options <**> helper)
   ( fullDesc
     <> progDesc "RESTful Web Service for IPv6 related data"
-    <> header "IPv6DB v0.1.0 APIv1, (c) Michel Boucey 2017" )
+    <> header "IPv6DB v0.2.0 APIv1, (c) Michel Boucey 2017" )
 
 options :: Parser Options
 options =
diff --git a/app/Queries.hs b/app/Queries.hs
--- a/app/Queries.hs
+++ b/app/Queries.hs
@@ -149,7 +149,7 @@
            -> Maybe Resource
 toResource list addr mi bs =
   decode (BSL.fromStrict bs) >>= \src ->
-    Just $
+    Just
       Resource
         { list    = list
         , address = IPv6Addr addr
@@ -172,7 +172,6 @@
         A.Error _   -> Nothing
     _         -> Nothing
 
-listAddressSeparator :: T.Text
 getByAddresses :: RedisCtx m f
                => T.Text
                -> Addresses
@@ -213,5 +212,6 @@
 toKey list addr =
   encodeUtf8 (list <> listAddressSeparator <> addr)
 
+listAddressSeparator :: T.Text
 listAddressSeparator = "/"
 
