diff --git a/Changelog.md b/Changelog.md
--- a/Changelog.md
+++ b/Changelog.md
@@ -1,3 +1,8 @@
+### 0.3.2.0
+
+- Do not pass the *first-run* flag to simple services with the
+  *SingleShotService* sleeping strategy.
+
 ### 0.3.1.0
 
 - Names of the storages for custom types now contain the name of the service
diff --git a/NgxExport/Tools.hs b/NgxExport/Tools.hs
--- a/NgxExport/Tools.hs
+++ b/NgxExport/Tools.hs
@@ -393,8 +393,8 @@
 --               | ConfJSONCon2 deriving (Generic, Show)
 -- instance FromJSON ConfJSON
 --
--- testReadConfJSON :: ConfJSON -> Bool -> IO L.ByteString
--- __/testReadConfJSON/__ = const . testRead
+-- testReadConfJSON :: ConfJSON -> IO L.ByteString
+-- __/testReadConfJSON/__ = testRead
 -- 'ngxExportSimpleServiceTypedAsJSON' \'testReadConfJSON \'\'ConfJSON
 --     'SingleShotService'
 -- @
@@ -567,7 +567,7 @@
                               threadDelaySec $ toSec $ Hr 1|]
                        ,[|\conf_data__ ->
                               if $(eFstRun)
-                                  then $(eF) (fromJust conf_data__) $(eFstRun)
+                                  then $(eF) $ fromJust conf_data__
                                   else return L.empty
                         |]
                        )
@@ -598,17 +598,39 @@
         ,ngxExportServiceIOYY nameSsf
         ]
 
--- | Exports a simple service with specified name and service mode.
+-- | Exports a simple service of type
 --
--- The service expects a plain 'ByteString' object as its first argument.
+-- @
+-- 'ByteString' -> 'Prelude.Bool' -> 'IO' 'L.ByteString'
+-- @
+--
+-- or (when service mode is 'SingleShotService')
+--
+-- @
+-- 'ByteString' -> 'IO' 'L.ByteString'
+-- @
+--
+-- with specified name and service mode.
 ngxExportSimpleService :: Name         -- ^ Name of the service
                        -> ServiceMode  -- ^ Service mode
                        -> Q [Dec]
 ngxExportSimpleService f =
     ngxExportSimpleService' f Nothing
 
--- | Exports a simple service with specified name and service mode.
+-- | Exports a simple service of type
 --
+-- @
+-- 'Read' a => a -> 'Prelude.Bool' -> 'IO' 'L.ByteString'
+-- @
+--
+-- or (when service mode is 'SingleShotService')
+--
+-- @
+-- 'Read' a => a -> 'IO' 'L.ByteString'
+-- @
+--
+-- with specified name and service mode.
+--
 -- The service expects an object of a custom type deriving 'Read' as its
 -- first argument. For the sake of efficiency, this object gets deserialized
 -- into a global 'IORef' data storage on the first service run to be further
@@ -623,7 +645,19 @@
 ngxExportSimpleServiceTyped f c =
     ngxExportSimpleService' f $ Just (c, False)
 
--- | Exports a simple service with specified name and service mode.
+-- | Exports a simple service of type
+--
+-- @
+-- 'FromJSON' a => a -> 'Prelude.Bool' -> 'IO' 'L.ByteString'
+-- @
+--
+-- or (when service mode is 'SingleShotService')
+--
+-- @
+-- 'FromJSON' a => a -> 'IO' 'L.ByteString'
+-- @
+--
+-- with specified name and service mode.
 --
 -- The service expects an object of a custom type deriving 'FromJSON' as its
 -- first argument. For the sake of efficiency, this object gets deserialized
diff --git a/ngx-export-tools.cabal b/ngx-export-tools.cabal
--- a/ngx-export-tools.cabal
+++ b/ngx-export-tools.cabal
@@ -1,5 +1,5 @@
 name:                       ngx-export-tools
-version:                    0.3.1.0
+version:                    0.3.2.0
 synopsis:                   Extra tools for Nginx haskell module
 description:                Extra tools for
         <http://github.com/lyokha/nginx-haskell-module Nginx haskell module>.