diff options
| author |  Joey Hess <joey@kitenet.net> | 2010-11-11 18:54:52 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2010-11-11 18:54:52 -0400 |
| commit | da0de293d16ace6aac574d0cdc37ec41715b7d66 (patch) | |
| tree | 4ebabdd2e3afa95127441909c8a423eecda7d81c /Command/Fix.hs | |
| parent | 5357d3a37af9e3d3a0aec207a8ba7fb94bfea953 (diff) | |
refactor param seeking
Diffstat (limited to 'Command/Fix.hs')
| -rw-r--r-- | Command/Fix.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Command/Fix.hs b/Command/Fix.hs index 9db832cc7..323aca95e 100644 --- a/Command/Fix.hs +++ b/Command/Fix.hs @@ -17,6 +17,9 @@ import Utility import Core import Messages +seek :: [SubCmdSeek] +seek = [withFilesInGit start] + {- Fixes the symlink to an annexed file. -} start :: SubCmdStartString start file = isAnnexed file $ \(key, _) -> do |