1 module Databrary.Model.AssetRevision.Types
    2   ( AssetRevision(..)
    3   , makeAssetRevision
    4   ) where
    5 
    6 import Databrary.Model.Asset.Types
    7 
    8 data AssetRevision = AssetRevision
    9   { revisionAsset :: !Asset
   10   , revisionOrig :: !Asset
   11   }
   12 
   13 makeAssetRevision :: Asset -> Asset -> AssetRevision
   14 makeAssetRevision o a = AssetRevision a o