summaryrefslogtreecommitdiff
path: root/Command/Get.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/Get.hs
parent5357d3a37af9e3d3a0aec207a8ba7fb94bfea953 (diff)
refactor param seeking
Diffstat (limited to 'Command/Get.hs')
-rw-r--r--Command/Get.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/Command/Get.hs b/Command/Get.hs
index c50b5a377..13d137537 100644
--- a/Command/Get.hs
+++ b/Command/Get.hs
@@ -13,6 +13,9 @@ import Types
import Core
import Messages
+seek :: [SubCmdSeek]
+seek = [withFilesInGit start]
+
{- Gets an annexed file from one of the backends. -}
start :: SubCmdStartString
start file = isAnnexed file $ \(key, backend) -> do