Replace for with one from Data.Traversable

src/Prelude.hs

@@ -85,6 +85,7 @@ import Data.Maybe hiding (fromJust)
 import qualified Data.Maybe.Optics as O
 import Data.Monoid
 import Data.Monoid.Utils
+import Data.Traversable (for)
 import Data.Text (Text)
 import qualified Data.Text as T
 import qualified Data.Text.Lazy as TL
@@ -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 =