mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

add assistant command

Browse source 
like watch, but more magic
This commit is contained in:
Joey Hess 2012-06-22 13:04:03 -04:00
parent cf9bf920e8
commit 3ee44cf8fe
5 changed files with 36 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

6
Assistant.hs
View file

@ -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