diff options
| -rw-r--r-- | Command/DiffDriver.hs | 2 | ||||
| -rw-r--r-- | Command/MetaData.hs | 2 | ||||
| -rw-r--r-- | Command/Reinit.hs | 2 | ||||
| -rw-r--r-- | Command/VCycle.hs | 2 |
4 files changed, 4 insertions, 4 deletions
diff --git a/Command/DiffDriver.hs b/Command/DiffDriver.hs index fa4f49366..f6ef77ecd 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 f1de6b6de..08f205359 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 b1264effa..f201c66bb 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 f9a21892b..bf253adc1 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 |