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

typo

Browse source
This commit is contained in:
Joey Hess 2017-11-16 12:54:42 -04:00
parent 5a4733c5a6
commit 9c7f168e89
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Annex/Perms.hs
View file

@ -112,7 +112,7 @@ isContentWritePermOk file = ifM crippledFileSystem
go AllShared = want writeModes go AllShared = want writeModes
go _ = return True go _ = return True
want wantmode = do want wantmode = do
liftIO $ catchMaybeIO $ fileMode <$> getFileStatus file mmode <- liftIO $ catchMaybeIO $ fileMode <$> getFileStatus file
return $ case mmode of return $ case mmode of
Nothing -> True Nothing -> True
Just havemode -> havemode == combineModes (havemode:wantmode) Just havemode -> havemode == combineModes (havemode:wantmode)