rhi/gallery
1
0
Fork 0
Code Issues 5 Pull requests 1 Releases Wiki Activity

use download for bigFile if it exists

Browse source
This commit is contained in:
rhiannon morris 2025-01-31 18:38:11 +01:00
parent 4d7c521070
commit 42089136e1
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
make-pages/Info.hs
View file

@ -296,8 +296,10 @@ pageFile img =
if canResize img then addSuffix "_med" img.path else img.path if canResize img then addSuffix "_med" img.path else img.path
bigFile :: Image -> FilePath bigFile :: Image -> FilePath
bigFile img = bigFile img
if canResize img then addSuffix "_big" img.path else img.path | Just path <- img.download = path
| canResize img = addSuffix "_big" img.path
| otherwise = img.path
addSuffix :: String -> FilePath -> FilePath addSuffix :: String -> FilePath -> FilePath
addSuffix suf path = addSuffix suf path =