avers-api-0.0.1: src/Avers/API/Instances.hs

{-# OPTIONS_GHC -fno-warn-orphans #-}

module Avers.API.Instances where


import Avers
import Servant.API (FromText(..))



instance FromText ObjId where
    fromText = Just . ObjId

instance FromText RevId where
    fromText x = fromText x >>= Just . RevId