diff options
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 b5f6804e7..7c3893be3 100644 --- a/GitAnnexShell.hs +++ b/GitAnnexShell.hs @@ -104,7 +104,7 @@ builtin cmd dir params = do Git.Construct.repoAbsPath dir >>= Git.Construct.fromAbsPath where addrsyncopts opts seek k = setField "RsyncOptions" opts >> seek k - newcmd opts c = c { cmdseek = map (addrsyncopts opts) (cmdseek c) } + newcmd opts c = c { cmdseek = addrsyncopts opts (cmdseek c) } external :: [String] -> IO () external params = do |