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

installNautilus: “exec” git-annex and protect params with “--”

Browse source
This commit is contained in:
Johan Kiviniemi 2014-03-23 07:28:28 +02:00
parent cc6a7108f5
commit 284e6b5e8d
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Assistant/Install.hs
View file

@ -94,7 +94,7 @@ installNautilus program = do
installscript (scriptdir </> scriptname action) $ unlines installscript (scriptdir </> scriptname action) $ unlines
[ "#!/bin/sh" [ "#!/bin/sh"
, autoaddedcomment , autoaddedcomment
, program ++ " " ++ action ++ " --notify-start --notify-finish \"$@\"" , "exec " ++ program ++ " " ++ action ++ " --notify-start --notify-finish -- \"$@\""
] ]
scriptname action = "git-annex " ++ action scriptname action = "git-annex " ++ action
installscript f c = whenM (safetoinstallscript f) $ do installscript f c = whenM (safetoinstallscript f) $ do