diff options
author | Joey Hess <joeyh@joeyh.name> | 2015-07-10 02:18:08 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2015-07-10 02:18:08 -0400 |
commit | bc9b0307cf427ab8ca6532c2ae4e0086e7ad4a4a (patch) | |
tree | 43d0984a200cb6ca68335da30b2574650955e2a4 /Types | |
parent | ccd76ebf641ad481e549da97c85f73101a3149fd (diff) |
improve global options display in --help
Put them in the help of subcommands, not the main command.
And, hide them from the synopsis, to avoid cluttering it.
Diffstat (limited to 'Types')
-rw-r--r-- | Types/DeferredParse.hs | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/Types/DeferredParse.hs b/Types/DeferredParse.hs index c11b722bf..619d68e9c 100644 --- a/Types/DeferredParse.hs +++ b/Types/DeferredParse.hs @@ -39,13 +39,3 @@ instance DeferredParseClass [DeferredParse a] where -- Use when the Annex action modifies Annex state. type GlobalSetter = DeferredParse () - -globalFlag :: Annex () -> Mod FlagFields GlobalSetter -> Parser GlobalSetter -globalFlag setter = flag' (DeferredParse setter) - -globalSetter :: (v -> Annex ()) -> Parser v -> Parser GlobalSetter -globalSetter setter parser = DeferredParse . setter <$> parser - -combineGlobalSetters :: [Parser GlobalSetter] -> Parser GlobalSetter -combineGlobalSetters l = DeferredParse . sequence_ . map getParsed - <$> many (foldl1 (<|>) l) |