Replace for with one from Data.Traversable

scrive · Oct 31, 2024 · f6ed06b · f6ed06b
1 parent 95c9e7f
commit f6ed06b
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 5 deletions.
diff --git a/scrive-prelude.cabal b/scrive-prelude.cabal
@@ -1,6 +1,6 @@
 cabal-version: 3.0
 name:          scrive-prelude
-version:       1.0.3.0
+version:       1.0.3.1
 author:        Scrive AB
 maintainer:    Scrive AB
 copyright:     2021

diff --git a/src/Prelude.hs b/src/Prelude.hs
@@ -88,6 +88,7 @@ import Data.Monoid.Utils
 import Data.Text (Text)
 import qualified Data.Text as T
 import qualified Data.Text.Lazy as TL
+import Data.Traversable (for)
 import qualified Data.Tuple.Optics as O
 import GHC.Generics (Generic)
 import qualified GHC.Read as Read
@@ -202,10 +203,6 @@ copy x fromThis toThat = set x (view x fromThis) toThat
 
 ----------------------------------------
 
--- | Just @flip map@.
-for :: [a] -> (a -> b) -> [b]
-for = flip map
-
 -- | Read a value and return 'Nothing' if an error occurs during parsing.
 maybeRead :: Read a => Text -> Maybe a
 maybeRead s =