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