From 583206d728effb8a39fc832567e67fe9da892815 Mon Sep 17 00:00:00 2001 From: joshvera Date: Wed, 1 Jun 2016 17:39:20 -0400 Subject: [PATCH] Export Join from Data.Functor.Both so we can use runJoin --- src/Data/Functor/Both.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Data/Functor/Both.hs b/src/Data/Functor/Both.hs index 2c2d1b814..84e067d99 100644 --- a/src/Data/Functor/Both.hs +++ b/src/Data/Functor/Both.hs @@ -1,7 +1,7 @@ {-# LANGUAGE FlexibleInstances #-} -module Data.Functor.Both where +module Data.Functor.Both (Both,both, runBothWith, fst, snd, module X) where -import Data.Bifunctor.Join +import Data.Bifunctor.Join as X import Prologue hiding (zipWith, fst, snd) import qualified Prologue