summaryrefslogtreecommitdiff
path: root/Command/Assistant.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Assistant.hs')
-rw-r--r--Command/Assistant.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/Command/Assistant.hs b/Command/Assistant.hs
index d405bc8b3..51d5a46b2 100644
--- a/Command/Assistant.hs
+++ b/Command/Assistant.hs
@@ -21,8 +21,9 @@ import System.Environment
cmd :: Command
cmd = noRepo checkNoRepoOpts $ dontCheck repoExists $ withOptions options $
- notBareRepo $ command "assistant" paramNothing seek SectionCommon
+ notBareRepo $ command "assistant" SectionCommon
"automatically sync changes"
+ paramNothing (withParams seek)
options :: [Option]
options =
@@ -42,7 +43,7 @@ autoStopOption = flagOption [] "autostop" "stop in known repositories"
startDelayOption :: Option
startDelayOption = fieldOption [] "startdelay" paramNumber "delay before running startup scan"
-seek :: CommandSeek
+seek :: CmdParams -> CommandSeek
seek ps = do
stopdaemon <- getOptionFlag Command.Watch.stopOption
foreground <- getOptionFlag Command.Watch.foregroundOption