diff options
Diffstat (limited to 'compiler/src/Processors.hs')
| -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 | ||