diff options
Diffstat (limited to 'Annex')
-rw-r--r-- | Annex/Perms.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Annex/Perms.hs b/Annex/Perms.hs index cfd25a5ee..1ce342911 100644 --- a/Annex/Perms.hs +++ b/Annex/Perms.hs @@ -112,7 +112,7 @@ isContentWritePermOk file = ifM crippledFileSystem go AllShared = want writeModes go _ = return True want wantmode = do - liftIO $ catchMaybeIO $ fileMode <$> getFileStatus file + mmode <- liftIO $ catchMaybeIO $ fileMode <$> getFileStatus file return $ case mmode of Nothing -> True Just havemode -> havemode == combineModes (havemode:wantmode) |