summaryrefslogtreecommitdiff
path: root/Command/Copy.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-12-29 14:28:19 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-12-29 14:28:19 -0400
commitee3407de64d52d91500c6b761ad45c7a22eb73cb (patch)
tree5740f4e2c706f033d1a18602eb7e9148f6a1f365 /Command/Copy.hs
parent1b007068ca4936306889b8b3af2bf224746a2318 (diff)
block all commands that don't work in direct mode
I left status working in direct mode, although it doesn't show correct stats for known annex keys.
Diffstat (limited to 'Command/Copy.hs')
-rw-r--r--Command/Copy.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/Command/Copy.hs b/Command/Copy.hs
index 6967c2f93..08c95369b 100644
--- a/Command/Copy.hs
+++ b/Command/Copy.hs
@@ -14,8 +14,9 @@ import qualified Remote
import Annex.Wanted
def :: [Command]
-def = [withOptions Command.Move.options $ command "copy" paramPaths seek
- "copy content of files to/from another repository"]
+def = [notDirect $
+ withOptions Command.Move.options $ command "copy" paramPaths seek
+ "copy content of files to/from another repository"]
seek :: [CommandSeek]
seek = [withField Command.Move.toOption Remote.byName $ \to ->