diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2015-02-09 14:16:42 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-02-09 14:16:42 -0400 |
| commit | 1e5d450e5a2476c8796a33991450bc18be4bfd7b (patch) | |
| tree | 80c679082a677d786a0fe8cf0db98acb171613e5 /Assistant.hs | |
| parent | 554be78d4e068140488cbf669590aae0a528b40d (diff) | |
comment
Diffstat (limited to 'Assistant.hs')
| -rw-r--r-- | Assistant.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Assistant.hs b/Assistant.hs index e49924928..eb01bb9b9 100644 --- a/Assistant.hs +++ b/Assistant.hs @@ -73,6 +73,7 @@ stopDaemon = liftIO . Utility.Daemon.stopDaemon =<< fromRepo gitAnnexPidFile - stdout and stderr descriptors. -} startDaemon :: Bool -> Bool -> Maybe Duration -> Maybe String -> Maybe HostName -> Maybe (Maybe Handle -> Maybe Handle -> String -> FilePath -> IO ()) -> Annex () startDaemon assistant foreground startdelay cannotrun listenhost startbrowser = do + Annex.changeState $ \s -> s { Annex.daemon = True } pidfile <- fromRepo gitAnnexPidFile logfile <- fromRepo gitAnnexLogFile |