mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

rename

Browse source
This commit is contained in:
Joey Hess 2011-04-17 00:40:23 -04:00
parent d996637fd6
commit b6b04642c8
4 changed files with 9 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Remote/Directory.hs
View file

@ -27,7 +27,7 @@ import Config
import Content
import Utility
import Remote.Special
import Remote.Encrypted
import Remote.Encryptable
import Crypto
remote :: RemoteType Annex
@ -42,7 +42,7 @@ gen :: Git.Repo -> UUID -> Maybe RemoteConfig -> Annex (Remote Annex)
gen r u c = do
dir <- getConfig r "directory" (error "missing directory")
cst <- remoteCost r cheapRemoteCost
return $ encryptedRemote c
return $ encryptableRemote c
(storeEncrypted dir)
(retrieveEncrypted dir)
Remote {