diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -8,4 +8,4 @@
 - journal log
 
 Available on hackage
-http://hackage.haskell.org/package/systemd-1.0.0/docs/System-Systemd-Daemon.html
+http://hackage.haskell.org/package/systemd-1.1.0/docs/System-Systemd-Daemon.html
diff --git a/System/Systemd/Daemon.hs b/System/Systemd/Daemon.hs
--- a/System/Systemd/Daemon.hs
+++ b/System/Systemd/Daemon.hs
@@ -134,14 +134,14 @@
 -- | Notify systemd to store a socket for us
 -- To be used along getActivatedSockets during a restart
 -- usefull for zero downtime restart
-storeFd :: Bool -> Socket -> IO (Maybe ())
-storeFd unset_env = notifyWithFD unset_env "FDSTORE=1"
+storeFd :: Socket -> IO (Maybe ())
+storeFd = notifyWithFD False "FDSTORE=1"
 
 -- | Notify systemd to store a socket for us and specify a name
 -- To be used along getActivatedSocketsWithNames during a restart
 -- usefull for zero downtime restart
-storeFdWithName :: Bool -> Socket -> String -> IO (Maybe ())
-storeFdWithName unset_env sock name = notifyWithFD unset_env ("FDSTORE=1\nFDNAME=" ++ name) sock
+storeFdWithName :: Socket -> String -> IO (Maybe ())
+storeFdWithName sock name = notifyWithFD False ("FDSTORE=1\nFDNAME=" ++ name) sock
 
 -- | Unset all environnement variable related to Systemd.
 -- Calls to 'notify' like and 'getActivatedSockets' functions will return 'Nothing' after that
diff --git a/systemd.cabal b/systemd.cabal
--- a/systemd.cabal
+++ b/systemd.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                systemd
-version:             1.1.0
+version:             1.1.1
 synopsis:            Systemd facilities (Socket activation, Notify)
 description:         A module for Systemd facilities.
 homepage:            https://github.com/erebe/systemd
diff --git a/test/Main.hs b/test/Main.hs
--- a/test/Main.hs
+++ b/test/Main.hs
@@ -27,9 +27,9 @@
   s <- listenOn (PortNumber 1213)
   s' <- listenOn (PortNumber 1214)
 
-  x <- storeFd False s
+  x <- storeFd s
   apF x
-  x <- storeFdWithName False s' "tutu"
+  x <- storeFdWithName s' "tutu"
   apF x
   forever (runner s)
     where