diff options
Diffstat (limited to 'Command')
| -rw-r--r-- | Command/ConfigList.hs | 2 | ||||
| -rw-r--r-- | Command/DropKey.hs | 2 | ||||
| -rw-r--r-- | Command/InAnnex.hs | 2 | ||||
| -rw-r--r-- | Command/RecvKey.hs | 2 | ||||
| -rw-r--r-- | Command/SendKey.hs | 2 | ||||
| -rw-r--r-- | Command/TransferKey.hs | 2 | ||||
| -rw-r--r-- | Command/Version.hs | 2 | ||||
| -rw-r--r-- | Command/WebApp.hs | 2 | ||||
| -rw-r--r-- | Command/Whereis.hs | 2 |
9 files changed, 9 insertions, 9 deletions
diff --git a/Command/ConfigList.hs b/Command/ConfigList.hs index fc4ba9102..505ad99e1 100644 --- a/Command/ConfigList.hs +++ b/Command/ConfigList.hs @@ -12,7 +12,7 @@ import Command import Annex.UUID def :: [Command] -def = [oneShot $ command "configlist" paramNothing seek +def = [noCommit $ command "configlist" paramNothing seek "outputs relevant git configuration"] seek :: [CommandSeek] diff --git a/Command/DropKey.hs b/Command/DropKey.hs index d55c5e83a..c0d4f85cf 100644 --- a/Command/DropKey.hs +++ b/Command/DropKey.hs @@ -15,7 +15,7 @@ import Annex.Content import Types.Key def :: [Command] -def = [oneShot $ command "dropkey" (paramRepeating paramKey) seek +def = [noCommit $ command "dropkey" (paramRepeating paramKey) seek "drops annexed content for specified keys"] seek :: [CommandSeek] diff --git a/Command/InAnnex.hs b/Command/InAnnex.hs index ad0a4d5c7..ac4af8d0b 100644 --- a/Command/InAnnex.hs +++ b/Command/InAnnex.hs @@ -12,7 +12,7 @@ import Command import Annex.Content def :: [Command] -def = [oneShot $ command "inannex" (paramRepeating paramKey) seek +def = [noCommit $ command "inannex" (paramRepeating paramKey) seek "checks if keys are present in the annex"] seek :: [CommandSeek] diff --git a/Command/RecvKey.hs b/Command/RecvKey.hs index 0606f9c51..6db6ed41b 100644 --- a/Command/RecvKey.hs +++ b/Command/RecvKey.hs @@ -16,7 +16,7 @@ import Logs.Transfer import Command.SendKey (fieldTransfer) def :: [Command] -def = [oneShot $ command "recvkey" paramKey seek +def = [noCommit $ command "recvkey" paramKey seek "runs rsync in server mode to receive content"] seek :: [CommandSeek] diff --git a/Command/SendKey.hs b/Command/SendKey.hs index 8f914b5ed..aa6d5c4fc 100644 --- a/Command/SendKey.hs +++ b/Command/SendKey.hs @@ -15,7 +15,7 @@ import Logs.Transfer import qualified Fields def :: [Command] -def = [oneShot $ command "sendkey" paramKey seek +def = [noCommit $ command "sendkey" paramKey seek "runs rsync in server mode to send content"] seek :: [CommandSeek] diff --git a/Command/TransferKey.hs b/Command/TransferKey.hs index 1af95f170..ed6fbb68c 100644 --- a/Command/TransferKey.hs +++ b/Command/TransferKey.hs @@ -19,7 +19,7 @@ import qualified Option def :: [Command] def = [withOptions options $ - oneShot $ command "transferkey" paramKey seek + noCommit $ command "transferkey" paramKey seek "transfers a key from or to a remote"] options :: [Option] diff --git a/Command/Version.hs b/Command/Version.hs index af08d3d70..4cc5cb4ae 100644 --- a/Command/Version.hs +++ b/Command/Version.hs @@ -13,7 +13,7 @@ import qualified Build.SysConfig as SysConfig import Annex.Version def :: [Command] -def = [oneShot $ noRepo showPackageVersion $ dontCheck repoExists $ +def = [noCommit $ noRepo showPackageVersion $ dontCheck repoExists $ command "version" paramNothing seek "show version info"] seek :: [CommandSeek] diff --git a/Command/WebApp.hs b/Command/WebApp.hs index a7d00738f..ae37b324c 100644 --- a/Command/WebApp.hs +++ b/Command/WebApp.hs @@ -31,7 +31,7 @@ import Control.Concurrent import Control.Concurrent.STM def :: [Command] -def = [oneShot $ noRepo startNoRepo $ dontCheck repoExists $ +def = [noCommit $ noRepo startNoRepo $ dontCheck repoExists $ command "webapp" paramNothing seek "launch webapp"] seek :: [CommandSeek] diff --git a/Command/Whereis.hs b/Command/Whereis.hs index b697bf554..c77b3a02c 100644 --- a/Command/Whereis.hs +++ b/Command/Whereis.hs @@ -15,7 +15,7 @@ import Remote import Logs.Trust def :: [Command] -def = [command "whereis" paramPaths seek +def = [noCommit $ command "whereis" paramPaths seek "lists repositories that have file content"] seek :: [CommandSeek] |