summaryrefslogtreecommitdiff
path: root/Git/UnionMerge.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-12-09 01:57:13 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-12-09 01:57:13 -0400
commitd64132a43ae176e8a1353d5463c5387a93da9ad7 (patch)
treeb98b328a292807c00e4b9590e7cf3094ec176a49 /Git/UnionMerge.hs
parente3f1568e0ff7dc872f3782115c74b9e7d8c291b2 (diff)
hslint
Diffstat (limited to 'Git/UnionMerge.hs')
-rw-r--r--Git/UnionMerge.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Git/UnionMerge.hs b/Git/UnionMerge.hs
index edc8cb20b..ddbff6a82 100644
--- a/Git/UnionMerge.hs
+++ b/Git/UnionMerge.hs
@@ -48,7 +48,7 @@ merge_index h repo bs =
- earlier ones, so the list can be generated from any combination of
- ls_tree, merge_trees, and merge_tree_index. -}
update_index :: Repo -> [String] -> IO ()
-update_index repo ls = stream_update_index repo [\s -> mapM_ s ls]
+update_index repo ls = stream_update_index repo [(`mapM_` ls)]
{- Streams content into update-index. -}
stream_update_index :: Repo -> [Streamer] -> IO ()