diff options
author | pacien | 2020-01-29 22:17:13 +0100 |
---|---|---|
committer | pacien | 2020-01-29 22:17:13 +0100 |
commit | c8692be41903791764de314c099ead7f078eed20 (patch) | |
tree | 167438937bda9dc321f37a52ff80525cbd96bfbd /compiler | |
parent | c05cbe525ad44273cc1b9b58549af757f549dcb7 (diff) | |
download | ldgallery-c8692be41903791764de314c099ead7f078eed20.tar.gz |
compiler: fix picture item type without resize
GitHub: closes #52
Diffstat (limited to 'compiler')
-rw-r--r-- | compiler/src/Processors.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/src/Processors.hs b/compiler/src/Processors.hs index 4e7c5a7..f2ade63 100644 --- a/compiler/src/Processors.hs +++ b/compiler/src/Processors.hs | |||
@@ -138,8 +138,8 @@ itemFileProcessor maxResolution cached inputBase outputBase resClass inputRes = | |||
138 | (processor, props) = processorFor maxResolution $ formatFromPath inputRes | 138 | (processor, props) = processorFor maxResolution $ formatFromPath inputRes |
139 | 139 | ||
140 | processorFor :: Maybe Resolution -> Format -> (FileProcessor, Resource -> GalleryItemProps) | 140 | processorFor :: Maybe Resolution -> Format -> (FileProcessor, Resource -> GalleryItemProps) |
141 | processorFor Nothing _ = (copyFileProcessor, Other) | ||
142 | processorFor (Just maxRes) PictureFormat = (resizePictureUpTo maxRes, Picture) | 141 | processorFor (Just maxRes) PictureFormat = (resizePictureUpTo maxRes, Picture) |
142 | processorFor Nothing PictureFormat = (copyFileProcessor, Picture) | ||
143 | processorFor _ Unknown = (copyFileProcessor, Other) -- TODO: handle video reencoding and others? | 143 | processorFor _ Unknown = (copyFileProcessor, Other) -- TODO: handle video reencoding and others? |
144 | 144 | ||
145 | 145 | ||