Install nautilus hooks even when ~/.local/share/nautilus/ does not yet exist, since it is not automatically created for Gnome 3 users.
This commit is contained in:
parent
3cdbeb5e3c
commit
67016b5123
2 changed files with 5 additions and 3 deletions
|
@ -92,9 +92,9 @@ installNautilus :: FilePath -> IO ()
|
|||
#ifdef linux_HOST_OS
|
||||
installNautilus program = do
|
||||
scriptdir <- (\d -> d </> "nautilus" </> "scripts") <$> userDataDir
|
||||
whenM (doesDirectoryExist scriptdir) $ do
|
||||
genscript scriptdir "get"
|
||||
genscript scriptdir "drop"
|
||||
createDirectoryIfMissing True scriptdir
|
||||
genscript scriptdir "get"
|
||||
genscript scriptdir "drop"
|
||||
where
|
||||
genscript scriptdir action =
|
||||
installscript (scriptdir </> scriptname action) $ unlines
|
||||
|
|
2
debian/changelog
vendored
2
debian/changelog
vendored
|
@ -22,6 +22,8 @@ git-annex (5.20140710) UNRELEASED; urgency=medium
|
|||
This is a security/usability tradeoff. To avoid exposing the gpg key
|
||||
ids who can decrypt the repository, users can unset
|
||||
gcrypt-publish-participants.
|
||||
* Install nautilus hooks even when ~/.local/share/nautilus/ does not yet
|
||||
exist, since it is not automatically created for Gnome 3 users.
|
||||
|
||||
-- Joey Hess <joeyh@debian.org> Wed, 09 Jul 2014 23:29:21 -0400
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue