{-# 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