add download files to dependencies??

This commit is contained in:
rhiannon morris 2025-01-31 18:37:39 +01:00
parent a2e974ca51
commit 4d7c521070

View file

@ -7,7 +7,7 @@ where
import BuilderQQ hiding (CanBuild (..)) import BuilderQQ hiding (CanBuild (..))
import Info hiding (Text) import Info hiding (Text)
import Data.Maybe (fromMaybe, mapMaybe) import Data.Maybe (fromMaybe)
import Data.Text.Lazy (Text) import Data.Text.Lazy (Text)
import Data.Foldable import Data.Foldable
import System.FilePath import System.FilePath
@ -32,7 +32,6 @@ dependSingle' yamlDir indexFile info prefix build nsfw =
maybe [] (toList . allImages) $ maybe [] (toList . allImages) $
if nsfw then Just $ info.images else sfwImages info if nsfw then Just $ info.images else sfwImages info
dls = mapMaybe (.download) images
extras = info.extras extras = info.extras
dir = build </> prefix </> yamlDir dir = build </> prefix </> yamlDir
@ -41,7 +40,7 @@ dependSingle' yamlDir indexFile info prefix build nsfw =
thumbFile (thumbnail info) : thumbFile (thumbnail info) :
map pageFile images ++ map pageFile images ++
map bigFile images ++ map bigFile images ++
dls ++ extras extras
dependGallery :: GalleryInfo dependGallery :: GalleryInfo
-> FilePath -- ^ index file -> FilePath -- ^ index file