Always try to thaw content, even when annex.crippledfilesystem is set.
This commit is contained in:
parent
d201e6c359
commit
9039bdb4ea
5 changed files with 30 additions and 4 deletions
|
@ -951,8 +951,13 @@ chmodContent file = unlessM crippledFileSystem $
|
||||||
{- Allows writing to an annexed file that freezeContent was called on
|
{- Allows writing to an annexed file that freezeContent was called on
|
||||||
- before. -}
|
- before. -}
|
||||||
thawContent :: FilePath -> Annex ()
|
thawContent :: FilePath -> Annex ()
|
||||||
thawContent file = unlessM crippledFileSystem $
|
thawContent file = ifM crippledFileSystem
|
||||||
withShared go
|
-- Probably cannot change mode on crippled filesystem,
|
||||||
|
-- but if file modes are supported, the content may be frozen
|
||||||
|
-- so try to thaw it.
|
||||||
|
( void $ tryNonAsync $ withShared go
|
||||||
|
, withShared go
|
||||||
|
)
|
||||||
where
|
where
|
||||||
go GroupShared = liftIO $ groupWriteRead file
|
go GroupShared = liftIO $ groupWriteRead file
|
||||||
go AllShared = liftIO $ groupWriteRead file
|
go AllShared = liftIO $ groupWriteRead file
|
||||||
|
|
|
@ -92,8 +92,15 @@ freezeContentDir file = unlessM crippledFileSystem $
|
||||||
go _ = liftIO $ preventWrite dir
|
go _ = liftIO $ preventWrite dir
|
||||||
|
|
||||||
thawContentDir :: FilePath -> Annex ()
|
thawContentDir :: FilePath -> Annex ()
|
||||||
thawContentDir file = unlessM crippledFileSystem $
|
thawContentDir file = ifM crippledFileSystem
|
||||||
liftIO $ allowWrite $ parentDir file
|
-- Probably cannot change mode on crippled filesystem,
|
||||||
|
-- but if file modes are supported, the directory may be frozen,
|
||||||
|
-- so try to thaw it.
|
||||||
|
( void $ tryNonAsync go
|
||||||
|
, go
|
||||||
|
)
|
||||||
|
where
|
||||||
|
go = liftIO $ allowWrite $ parentDir file
|
||||||
|
|
||||||
{- Makes the directory tree to store an annexed file's content,
|
{- Makes the directory tree to store an annexed file's content,
|
||||||
- with appropriate permissions on each level. -}
|
- with appropriate permissions on each level. -}
|
||||||
|
|
1
debian/changelog
vendored
1
debian/changelog
vendored
|
@ -11,6 +11,7 @@ git-annex (6.20160230) UNRELEASED; urgency=medium
|
||||||
* dropkey: Add --batch and --json.
|
* dropkey: Add --batch and --json.
|
||||||
* Fix OSX dmg to include libraries needed by bundled gpg,
|
* Fix OSX dmg to include libraries needed by bundled gpg,
|
||||||
lost in last release.
|
lost in last release.
|
||||||
|
* Always try to thaw content, even when annex.crippledfilesystem is set.
|
||||||
|
|
||||||
-- Joey Hess <id@joeyh.name> Mon, 29 Feb 2016 13:00:30 -0400
|
-- Joey Hess <id@joeyh.name> Mon, 29 Feb 2016 13:00:30 -0400
|
||||||
|
|
||||||
|
|
|
@ -103,3 +103,5 @@ Could the problem have something to do with the file having permission 0444 and
|
||||||
### Have you had any luck using git-annex before? (Sometimes we get tired of reading bug reports all day and a lil' positive end note does wonders)
|
### Have you had any luck using git-annex before? (Sometimes we get tired of reading bug reports all day and a lil' positive end note does wonders)
|
||||||
|
|
||||||
Been using it since your kickstarter campaign!
|
Been using it since your kickstarter campaign!
|
||||||
|
|
||||||
|
> [[done]] --[[Joey]]
|
||||||
|
|
|
@ -0,0 +1,11 @@
|
||||||
|
[[!comment format=mdwn
|
||||||
|
username="joey"
|
||||||
|
subject="""comment 6"""
|
||||||
|
date="2016-03-09T17:31:18Z"
|
||||||
|
content="""
|
||||||
|
Ok, I managed to get a vfat that honors file perms with those mount
|
||||||
|
options.
|
||||||
|
|
||||||
|
I'm going to make git-annex always try to chmod the file, even if it's on a
|
||||||
|
crippled filesystem. That should solve it.
|
||||||
|
"""]]
|
Loading…
Add table
Add a link
Reference in a new issue