DOH-0.1.0.0: src/Network/DigitalOcean/Utils/Actions.hs

{-# LANGUAGE OverloadedStrings #-}

module Network.DigitalOcean.Utils.Actions (actionType') where

import Data.Aeson

actionType' :: KeyValue kv => String -> kv
actionType' = (.=) "type"