diff options
author | Joey Hess <joey@kitenet.net> | 2014-04-26 19:25:05 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2014-04-26 19:25:05 -0400 |
commit | c7999da69b039829acc3b7da8005224af5bf6ed8 (patch) | |
tree | b17c7d897d95503f1af66efc98e28da1179d798c /Utility/Daemon.hs | |
parent | a885d67e97c63d8fff657f6eb8d503fd91b0b42c (diff) |
hlint
Diffstat (limited to 'Utility/Daemon.hs')
-rw-r--r-- | Utility/Daemon.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/Daemon.hs b/Utility/Daemon.hs index 11aa57686..5d47be035 100644 --- a/Utility/Daemon.hs +++ b/Utility/Daemon.hs @@ -36,7 +36,7 @@ daemonize logfd pidfile changedirectory a = do _ <- forkProcess child1 out where - checkalreadyrunning f = maybe noop (const $ alreadyRunning) + checkalreadyrunning f = maybe noop (const alreadyRunning) =<< checkDaemon f child1 = do _ <- createSession |