aboutsummaryrefslogtreecommitdiff
path: root/Command/Assistant.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-07-08 15:39:05 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-07-08 15:39:05 -0400
commitb2252febf1355e62a00fb735831d3b2a1aed2566 (patch)
tree621fb71f80252d300436261bb1d67ee537d1f7e9 /Command/Assistant.hs
parente7e61fb6cbe5455ded9bb550a64121223c099fc2 (diff)
support cmdnorepo actions, also using getopt-applicative there
Diffstat (limited to 'Command/Assistant.hs')
-rw-r--r--Command/Assistant.hs9
1 files changed, 5 insertions, 4 deletions
diff --git a/Command/Assistant.hs b/Command/Assistant.hs
index 51d5a46b2..08e96da07 100644
--- a/Command/Assistant.hs
+++ b/Command/Assistant.hs
@@ -20,10 +20,11 @@ import Assistant.Install
import System.Environment
cmd :: Command
-cmd = noRepo checkNoRepoOpts $ dontCheck repoExists $ withOptions options $
- notBareRepo $ command "assistant" SectionCommon
- "automatically sync changes"
- paramNothing (withParams seek)
+cmd = dontCheck repoExists $ withOptions options $ notBareRepo $
+ noRepo (withParams checkNoRepoOpts) $
+ command "assistant" SectionCommon
+ "automatically sync changes"
+ paramNothing (withParams seek)
options :: [Option]
options =