summaryrefslogtreecommitdiff
path: root/Command/Move.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-11-11 18:54:52 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-11-11 18:54:52 -0400
commitda0de293d16ace6aac574d0cdc37ec41715b7d66 (patch)
tree4ebabdd2e3afa95127441909c8a423eecda7d81c /Command/Move.hs
parent5357d3a37af9e3d3a0aec207a8ba7fb94bfea953 (diff)
refactor param seeking
Diffstat (limited to 'Command/Move.hs')
-rw-r--r--Command/Move.hs5
1 files changed, 4 insertions, 1 deletions
diff --git a/Command/Move.hs b/Command/Move.hs
index e0b079193..7f8f40737 100644
--- a/Command/Move.hs
+++ b/Command/Move.hs
@@ -11,7 +11,7 @@ import Control.Monad.State (liftIO)
import Monad (when)
import Command
-import Command.Drop
+import qualified Command.Drop
import qualified Annex
import Locations
import LocationLog
@@ -22,6 +22,9 @@ import qualified Remotes
import UUID
import Messages
+seek :: [SubCmdSeek]
+seek = [withFilesInGit start]
+
{- Move a file either --to or --from a repository.
-
- This only operates on the cached file content; it does not involve