summaryrefslogtreecommitdiff
path: root/Command/Watch.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-08-02 00:42:33 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-08-02 00:42:33 -0400
commit60da0d6ad28bff7c601ba631a8ec65030f940367 (patch)
tree56b137977c3f88c46e406859db8457a08fb80371 /Command/Watch.hs
parent23fe661d37ceb6c7bf754e9dc8fd5dda89793b63 (diff)
full autostart support
git annex assistant --autostart will start separate daemons in each listed autostart repo running the webapp outside any git-annex repo will open it on the first listed autostart repo
Diffstat (limited to 'Command/Watch.hs')
-rw-r--r--Command/Watch.hs9
1 files changed, 3 insertions, 6 deletions
diff --git a/Command/Watch.hs b/Command/Watch.hs
index 61c859106..eb70ef6b1 100644
--- a/Command/Watch.hs
+++ b/Command/Watch.hs
@@ -16,13 +16,10 @@ def :: [Command]
def = [withOptions [foregroundOption, stopOption] $
command "watch" paramNothing seek "watch for changes"]
-mkSeek :: Bool -> [CommandSeek]
-mkSeek assistant = [withFlag stopOption $ \stopdaemon ->
- withFlag foregroundOption $ \foreground ->
- withNothing $ start assistant foreground stopdaemon]
-
seek :: [CommandSeek]
-seek = mkSeek False
+seek = [withFlag stopOption $ \stopdaemon ->
+ withFlag foregroundOption $ \foreground ->
+ withNothing $ start False foreground stopdaemon]
foregroundOption :: Option
foregroundOption = Option.flag [] "foreground" "do not daemonize"