mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

syntax tweak

Browse source
This commit is contained in:
Joey Hess 2013-03-28 23:27:45 -04:00
parent 5434124c75
commit 34b03ef47a
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
CmdLine.hs
View file

@ -40,7 +40,7 @@ dispatch fuzzyok allargs allcmds commonoptions fields header getgitrepo = do
state <- Annex.new g state <- Annex.new g
(actions, state') <- Annex.run state $ do (actions, state') <- Annex.run state $ do
checkfuzzy checkfuzzy
forM_ fields $ \(f, v) -> Annex.setField f v forM_ fields $ uncurry Annex.setField
sequence_ flags sequence_ flags
prepCommand cmd params prepCommand cmd params
tryRun state' cmd $ [startup] ++ actions ++ [shutdown $ cmdnocommit cmd] tryRun state' cmd $ [startup] ++ actions ++ [shutdown $ cmdnocommit cmd]