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

This commit is contained in:
Johan Kiviniemi 2014-03-23 07:28:28 +02:00
parent cc6a7108f5
commit 284e6b5e8d

View file

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