Fix typo
commitb0c7d1bf5b337ad7154bda17e398a0c2f160d245
authorMichael Xavier <michael@michaelxavier.net>
dateMon 16 Mar 2015, 16:05 (12 years ago)
parentfb84d9a
src/Database/Bloodhound/Types.hs+1−1
@@ -269,7 +269,7 @@ instance (MonadReader r m) => MonadReader r (BH m) where
269269 local f (BH (ReaderT m)) = BH $ ReaderT $ \r ->
270270 local f (m r)
271271
272−instance (Functor m, Applicative m, MonadIO m) => MonadBloodhound (BH m) where
272+instance (Functor m, Applicative m, MonadIO m) => MonadBH (BH m) where
273273 getBHEnv = BH getBHEnv
274274
275275