diff options
| author |  Joey Hess <joey@kitenet.net> | 2010-10-13 03:41:12 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2010-10-13 03:41:12 -0400 |
| commit | 99b2029236248f6b4ce68e126b70fa0855fac37f (patch) | |
| tree | 74e373992ecfac6543245f4ab9f86bf54fdf8d11 /Backend.hs | |
| parent | cc5cf0093ea1aacc4c5460dfdd4d35f2963687bd (diff) | |
key conversion back from file bugfixes
Diffstat (limited to 'Backend.hs')
| -rw-r--r-- | Backend.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Backend.hs b/Backend.hs index 2697f43d4..bc7eb206f 100644 --- a/Backend.hs +++ b/Backend.hs @@ -69,5 +69,5 @@ lookupFile file = do lookup = do l <- readSymbolicLink file return $ Just (k l, b l) - k l = Key $ takeFileName $ l + k l = fileKey $ takeFileName $ l b l = lookupBackendName $ takeFileName $ parentDir $ l |