[add mpartitionWithKey
John Meacham <john@repetae.net>**20080222125412] hunk ./Util/SetLike.hs 158
+    mpartitionWithKey :: (k -> v -> Bool) -> m -> (m,m)
hunk ./Util/SetLike.hs 176
+    mpartitionWithKey = IM.partitionWithKey
hunk ./Util/SetLike.hs 189
+    mpartitionWithKey = M.partitionWithKey