From 579df471dee7b6fe0be8a9ad8e2fa2362c9bf6cd Mon Sep 17 00:00:00 2001 From: pacien Date: Tue, 28 Apr 2020 00:14:31 +0200 Subject: compiler: add picture size to index This is needed for the picture viewer fancy loading phase. --- compiler/src/Resource.hs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'compiler/src/Resource.hs') diff --git a/compiler/src/Resource.hs b/compiler/src/Resource.hs index b2a6bbf..e134468 100644 --- a/compiler/src/Resource.hs +++ b/compiler/src/Resource.hs @@ -72,7 +72,9 @@ instance ToJSON Resource where data GalleryItemProps = Directory { items :: [GalleryItem] } - | Picture { resource :: Resource } + | Picture + { resource :: Resource + , resolution :: Resolution } | Other { resource :: Resource } deriving (Generic, Show) -- cgit v1.2.3