From 69d37bd89407536050f7b3bb497a89e4c22ed068 Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Wed, 23 Sep 2015 13:09:08 -0400
Subject: [PATCH] fix bug in back-compat ifdef

---
 Utility/Bloom.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Utility/Bloom.hs b/Utility/Bloom.hs
index 668901f76f..67841225c1 100644
--- a/Utility/Bloom.hs
+++ b/Utility/Bloom.hs
@@ -53,7 +53,7 @@ notElemB :: a -> Bloom a -> Bool
 notElemB = Bloom.notElemB
 
 elemB :: a -> Bloom a -> Bool
-elemB = Bloom.elem
+elemB = Bloom.elemB
 
 newMB :: (a -> [Bloom.Hash]) -> Int -> ST s (Bloom.MBloom s a)
 newMB = Bloom.newMB