diff --git a/Command/DiffDriver.hs b/Command/DiffDriver.hs index fa4f493662..f6ef77ecd7 100644 --- a/Command/DiffDriver.hs +++ b/Command/DiffDriver.hs @@ -15,7 +15,7 @@ import Git.Types cmd :: [Command] cmd = [dontCheck repoExists $ - command "diffdriver" ("[-- cmd --opts]") seek + command "diffdriver" ("[-- cmd --]") seek SectionPlumbing "external git diff driver shim"] seek :: CommandSeek diff --git a/Command/MetaData.hs b/Command/MetaData.hs index f1de6b6de8..08f2053597 100644 --- a/Command/MetaData.hs +++ b/Command/MetaData.hs @@ -19,7 +19,7 @@ import Data.Time.Clock.POSIX cmd :: [Command] cmd = [withOptions metaDataOptions $ command "metadata" paramPaths seek - SectionMetaData "sets metadata of a file"] + SectionMetaData "sets or gets metadata of a file"] metaDataOptions :: [Option] metaDataOptions = diff --git a/Command/Reinit.hs b/Command/Reinit.hs index b1264effa9..f201c66bba 100644 --- a/Command/Reinit.hs +++ b/Command/Reinit.hs @@ -16,7 +16,7 @@ import qualified Remote cmd :: [Command] cmd = [dontCheck repoExists $ - command "reinit" (paramUUID ++ " or " ++ paramDesc) seek SectionUtility ""] + command "reinit" (paramUUID ++ "|" ++ paramDesc) seek SectionUtility "initialize repository, reusing old UUID"] seek :: CommandSeek seek = withWords start diff --git a/Command/VCycle.hs b/Command/VCycle.hs index f9a21892b4..bf253adc1c 100644 --- a/Command/VCycle.hs +++ b/Command/VCycle.hs @@ -16,7 +16,7 @@ import Command.View (checkoutViewBranch) cmd :: [Command] cmd = [notBareRepo $ notDirect $ - command "vcycle" paramNothing seek SectionUtility + command "vcycle" paramNothing seek SectionMetaData "switch view to next layout"] seek :: CommandSeek