diff options
author | Joey Hess <joey@kitenet.net> | 2012-06-22 13:04:03 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-06-22 13:04:03 -0400 |
commit | 3ee44cf8feb11fc439c02eb0eb8f12d290b01120 (patch) | |
tree | 41f68e6ad947af83134ad967442cc77e199c70f9 /Assistant.hs | |
parent | cf9bf920e8052edbcee9dd31bfb1c9b421296d14 (diff) |
add assistant command
like watch, but more magic
Diffstat (limited to 'Assistant.hs')
-rw-r--r-- | Assistant.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Assistant.hs b/Assistant.hs index e924d9477..33c7cef36 100644 --- a/Assistant.hs +++ b/Assistant.hs @@ -55,10 +55,10 @@ import Utility.LogFile import Control.Concurrent -startDaemon :: Bool -> Annex () -startDaemon foreground +startDaemon :: Bool -> Bool -> Annex () +startDaemon assistant foreground | foreground = do - showStart "watch" "." + showStart (if assistant then "assistant" else "watch") "." go id | otherwise = do logfd <- liftIO . openLog =<< fromRepo gitAnnexLogFile |