diff options
author | Joey Hess <joey@kitenet.net> | 2013-03-30 18:55:22 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2013-03-30 18:56:01 -0400 |
commit | 883395c399a0996d825711c6d8f29aa49ed07a69 (patch) | |
tree | fcbe2908946446d65c7bc862e761182ae5200f6d /GitAnnexShell.hs | |
parent | 027a9fd1b75d07f7261f7a6054d2fa3c50e4ec61 (diff) |
let's use words and unwords rather than split and intercalate " "
Diffstat (limited to 'GitAnnexShell.hs')
-rw-r--r-- | GitAnnexShell.hs | 2 |
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 |