hocon-0.1.0.0: src/Data/Bifunctor/Extra.hs

module Data.Bifunctor.Extra
  ( module Data.Bifunctor
  , mapValues
  )
where

import Data.Bifunctor (Bifunctor(..))
import Data.Map (Map)

mapValues :: (b -> c) -> Map a b -> Map a c
mapValues f = map (second f)