diff options
Diffstat (limited to 'Command/Whereis.hs')
-rw-r--r-- | Command/Whereis.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/Command/Whereis.hs b/Command/Whereis.hs index 0083f8c5c..723509fb1 100644 --- a/Command/Whereis.hs +++ b/Command/Whereis.hs @@ -14,7 +14,6 @@ import Command import Remote import Logs.Trust import GitAnnex.Options -import Types.Key def :: [Command] def = [noCommit $ withOptions (jsonOption : keyOptions) $ @@ -37,7 +36,7 @@ startKeys remotemap key = start' remotemap key Nothing start' :: M.Map UUID Remote -> Key -> AssociatedFile -> CommandStart start' remotemap key afile = do - showStart "whereis" (fromMaybe (key2file key) afile) + showStart' "whereis" key afile next $ perform remotemap key perform :: M.Map UUID Remote -> Key -> CommandPerform |