Compat.hs

module Data.Enumerator.Text.Compat
	( findBy
	) where
import qualified Data.Text as T
findBy :: (Char -> Bool) -> T.Text -> Maybe Char
findBy = T.find