summaryrefslogtreecommitdiff
path: root/GitAnnexShell.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-03-30 18:55:22 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-03-30 18:56:01 -0400
commit883395c399a0996d825711c6d8f29aa49ed07a69 (patch)
treefcbe2908946446d65c7bc862e761182ae5200f6d /GitAnnexShell.hs
parent027a9fd1b75d07f7261f7a6054d2fa3c50e4ec61 (diff)
let's use words and unwords rather than split and intercalate " "
Diffstat (limited to 'GitAnnexShell.hs')
-rw-r--r--GitAnnexShell.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/GitAnnexShell.hs b/GitAnnexShell.hs
index 61923c373..31912ebbe 100644
--- a/GitAnnexShell.hs
+++ b/GitAnnexShell.hs
@@ -89,7 +89,7 @@ builtin cmd dir params = do
checkDirectory $ Just dir
let (params', fieldparams, opts) = partitionParams params
fields = filter checkField $ parseFields fieldparams
- cmds' = map (newcmd $ intercalate " " opts) cmds
+ cmds' = map (newcmd $ unwords opts) cmds
dispatch False (cmd : params') cmds' options fields header $
Git.Construct.repoAbsPath dir >>= Git.Construct.fromAbsPath
where