remove --backend from global options
--backend is no longer a global option, and is only accepted by commands that actually need it. Three commands that used to support backend but don't any longer are watch, webapp, and assistant. It would be possible to make them support it, but I doubt anyone used the option with these. And in the case of webapp and assistant, the option was handled inconsistently, only taking affect when the command is run with an existing git-annex repo, not when it creates a new one. Also, renamed GlobalOption etc to AnnexOption. Because there are many options of this type that are not actually global (any more) and get added to commands that need them. Sponsored-by: Kevin Mueller on Patreon
This commit is contained in:
parent
3eecf2033a
commit
b223988e22
49 changed files with 209 additions and 196 deletions
|
@ -18,7 +18,7 @@ import CmdLine.Seek as ReExported
|
|||
import CmdLine.Usage as ReExported
|
||||
import CmdLine.Action as ReExported
|
||||
import CmdLine.Option as ReExported
|
||||
import CmdLine.GlobalSetter as ReExported
|
||||
import CmdLine.AnnexSetter as ReExported
|
||||
import CmdLine.GitAnnex.Options as ReExported
|
||||
import CmdLine.Batch as ReExported
|
||||
import Options.Applicative as ReExported hiding (command)
|
||||
|
@ -69,9 +69,9 @@ noMessages c = c { cmdnomessages = True }
|
|||
noRepo :: (String -> Parser (IO ())) -> Command -> Command
|
||||
noRepo a c = c { cmdnorepo = Just (a (cmdparamdesc c)) }
|
||||
|
||||
{- Adds global options to a command. -}
|
||||
withGlobalOptions :: [[GlobalOption]] -> Command -> Command
|
||||
withGlobalOptions os c = c { cmdglobaloptions = cmdglobaloptions c ++ concat os }
|
||||
{- Adds Annex options to a command. -}
|
||||
withAnnexOptions :: [[AnnexOption]] -> Command -> Command
|
||||
withAnnexOptions os c = c { cmdannexoptions = cmdannexoptions c ++ concat os }
|
||||
|
||||
{- For start stage to indicate what will be done. -}
|
||||
starting:: MkActionItem actionitem => String -> actionitem -> SeekInput -> CommandPerform -> CommandStart
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue