diff options
Diffstat (limited to 'Remote/Glacier.hs')
| -rw-r--r-- | Remote/Glacier.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Remote/Glacier.hs b/Remote/Glacier.hs index 289008266..75b264bac 100644 --- a/Remote/Glacier.hs +++ b/Remote/Glacier.hs @@ -162,8 +162,8 @@ retrieve r k sink = go =<< glacierEnv c u showLongNote "Recommend you wait up to 4 hours, and then run this command again." return ok -retrieveCheap :: Remote -> Key -> FilePath -> Annex Bool -retrieveCheap _ _ _ = return False +retrieveCheap :: Remote -> Key -> AssociatedFile -> FilePath -> Annex Bool +retrieveCheap _ _ _ _ = return False remove :: Remote -> Remover remove r k = glacierAction r |