summaryrefslogtreecommitdiff
path: root/GitAnnexShell.hs
diff options
context:
space:
mode:
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 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