summaryrefslogtreecommitdiff
path: root/Command
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-09-15 20:46:38 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-09-15 20:46:38 -0400
commitba0334116cd8811d49b96cd39dd83e565e0bedb7 (patch)
tree03b269a40b0b629a916f30665ccd1cf969f36589 /Command
parent9a9b4b840e81198b85db72920ac88748ae3e6b6d (diff)
more descriptive name for oneshot
Diffstat (limited to 'Command')
-rw-r--r--Command/ConfigList.hs2
-rw-r--r--Command/DropKey.hs2
-rw-r--r--Command/InAnnex.hs2
-rw-r--r--Command/RecvKey.hs2
-rw-r--r--Command/SendKey.hs2
-rw-r--r--Command/TransferKey.hs2
-rw-r--r--Command/Version.hs2
-rw-r--r--Command/WebApp.hs2
-rw-r--r--Command/Whereis.hs2
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]