The "git annex content" command is renamed to "git annex wanted".
This commit is contained in:
parent
049e80e865
commit
afddbfd7e9
9 changed files with 15 additions and 14 deletions
|
@ -5,7 +5,7 @@
|
|||
- Licensed under the GNU GPL version 3 or higher.
|
||||
-}
|
||||
|
||||
module Command.Content where
|
||||
module Command.Wanted where
|
||||
|
||||
import Common.Annex
|
||||
import Command
|
||||
|
@ -15,7 +15,7 @@ import Logs.PreferredContent
|
|||
import qualified Data.Map as M
|
||||
|
||||
def :: [Command]
|
||||
def = [command "content" (paramPair paramRemote (paramOptional paramExpression)) seek
|
||||
def = [command "wanted" (paramPair paramRemote (paramOptional paramExpression)) seek
|
||||
SectionSetup "get or set preferred content expression"]
|
||||
|
||||
seek :: [CommandSeek]
|
||||
|
@ -26,7 +26,7 @@ start = parse
|
|||
where
|
||||
parse (name:[]) = go name performGet
|
||||
parse (name:expr:[]) = go name $ \uuid -> do
|
||||
showStart "content" name
|
||||
showStart "wanted" name
|
||||
performSet expr uuid
|
||||
parse _ = error "Specify a repository."
|
||||
|
Loading…
Add table
Add a link
Reference in a new issue