diff options
| -rw-r--r-- | CmdLine.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/CmdLine.hs b/CmdLine.hs index db46cba82..63d36c74c 100644 --- a/CmdLine.hs +++ b/CmdLine.hs @@ -40,7 +40,7 @@ dispatch fuzzyok allargs allcmds commonoptions fields header getgitrepo = do state <- Annex.new g (actions, state') <- Annex.run state $ do checkfuzzy - forM_ fields $ \(f, v) -> Annex.setField f v + forM_ fields $ uncurry Annex.setField sequence_ flags prepCommand cmd params tryRun state' cmd $ [startup] ++ actions ++ [shutdown $ cmdnocommit cmd] |