diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-01-06 03:31:20 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-01-06 03:31:20 -0400 |
| commit | e0d6010d3602bfa6a231642816d788d5bc1b6988 (patch) | |
| tree | 439ec82c7e504946a824964cf3b325aba215d6fc /Command/Move.hs | |
| parent | 0a36f92a31196451c2d838fd0ae15527e8bbce18 (diff) | |
simplify
Diffstat (limited to 'Command/Move.hs')
| -rw-r--r-- | Command/Move.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Move.hs b/Command/Move.hs index 66a0c1660..b6a72bf6b 100644 --- a/Command/Move.hs +++ b/Command/Move.hs @@ -29,7 +29,7 @@ options :: [Option] options = [fromOption, toOption] seek :: [CommandSeek] -seek = [withField "to" id $ \to -> withField "from" id $ \from -> +seek = [withField "to" $ \to -> withField "from" $ \from -> withFilesInGit $ whenAnnexed $ start to from True] start :: Maybe String -> Maybe String -> Bool -> FilePath -> (Key, Backend) -> CommandStart |