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 f351c66e9..ecdc6a656 100644 --- a/Remote/Glacier.hs +++ b/Remote/Glacier.hs @@ -40,10 +40,10 @@ remote = RemoteType { setup = glacierSetup } -gen :: Git.Repo -> UUID -> RemoteConfig -> RemoteGitConfig -> Annex Remote +gen :: Git.Repo -> UUID -> RemoteConfig -> RemoteGitConfig -> Annex (Maybe Remote) gen r u c gc = new <$> remoteCost gc veryExpensiveRemoteCost where - new cst = encryptableRemote c + new cst = Just $ encryptableRemote c (storeEncrypted this) (retrieveEncrypted this) this |