diff options
author | Joey Hess <joey@kitenet.net> | 2011-01-25 21:02:34 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2011-01-25 21:02:34 -0400 |
commit | 109a719b03dbeb70eb317be17f7e18567efa9dac (patch) | |
tree | b48e0ef83b2472e3c99bd9c2d0f8cd5f10b215fd /Command/Migrate.hs | |
parent | f8e303e1c9a9d976a4dc339295aa0f09eb997b7f (diff) |
parameterize Backend type
This allows the Backend type to not depend on the Annex type, and
so the Annex type can later be moved out of TypeInternals.
Diffstat (limited to 'Command/Migrate.hs')
-rw-r--r-- | Command/Migrate.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Migrate.hs b/Command/Migrate.hs index 5bc54ceab..566b508c0 100644 --- a/Command/Migrate.hs +++ b/Command/Migrate.hs @@ -42,7 +42,7 @@ start (file, b) = isAnnexed file $ \(key, oldbackend) -> do return $ head backends choosebackend (Just backend) = return backend -perform :: FilePath -> Key -> Backend -> CommandPerform +perform :: FilePath -> Key -> Backend Annex -> CommandPerform perform file oldkey newbackend = do g <- Annex.gitRepo |