diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-03-12 06:45:56 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-03-12 06:45:56 -0400 |
| commit | 91114700f4888f7bda5ff067fb5a4cb9111ac1b2 (patch) | |
| tree | 8f3f81fbe3c2ea2c2f51959e750537ff35ccba3a /Assistant.hs | |
| parent | c1d039e90542be51402b61db92ce52725bae19ad (diff) | |
tweak
Diffstat (limited to 'Assistant.hs')
| -rw-r--r-- | Assistant.hs | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/Assistant.hs b/Assistant.hs index 98e156175..0b89369b0 100644 --- a/Assistant.hs +++ b/Assistant.hs @@ -178,7 +178,7 @@ startDaemon assistant foreground startbrowser = do origerr <- liftIO $ catchMaybeIO $ fdToHandle =<< dup stdError liftIO $ Utility.LogFile.redirLog logfd - showStart (if assistant then "assistant" else "watch") "." + showStart "." desc start id $ case startbrowser of Nothing -> Nothing @@ -186,6 +186,9 @@ startDaemon assistant foreground startbrowser = do else start (Utility.Daemon.daemonize logfd (Just pidfile) False) Nothing where + desc + | assistant = "assistant" + | otherwise = "watch" start daemonize webappwaiter = withThreadState $ \st -> do checkCanWatch when assistant $ checkEnvironment |