aboutsummaryrefslogtreecommitdiff
path: root/compiler/src/ItemProcessors.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/src/ItemProcessors.hs')
-rw-r--r--compiler/src/ItemProcessors.hs6
1 files changed, 4 insertions, 2 deletions
diff --git a/compiler/src/ItemProcessors.hs b/compiler/src/ItemProcessors.hs
index 476b7d7..fa99316 100644
--- a/compiler/src/ItemProcessors.hs
+++ b/compiler/src/ItemProcessors.hs
@@ -1,7 +1,7 @@
1-- ldgallery - A static generator which turns a collection of tagged 1-- ldgallery - A static generator which turns a collection of tagged
2-- pictures into a searchable web gallery. 2-- pictures into a searchable web gallery.
3-- 3--
4-- Copyright (C) 2019-2020 Pacien TRAN-GIRARD 4-- Copyright (C) 2019-2021 Pacien TRAN-GIRARD
5-- 5--
6-- This program is free software: you can redistribute it and/or modify 6-- This program is free software: you can redistribute it and/or modify
7-- it under the terms of the GNU Affero General Public License as 7-- it under the terms of the GNU Affero General Public License as
@@ -36,6 +36,7 @@ import Files
36data Format = 36data Format =
37 PictureFormat 37 PictureFormat
38 | PlainTextFormat 38 | PlainTextFormat
39 | MarkdownFormat
39 | PortableDocumentFormat 40 | PortableDocumentFormat
40 | VideoFormat 41 | VideoFormat
41 | AudioFormat 42 | AudioFormat
@@ -56,7 +57,7 @@ formatFromPath =
56 ".gif" -> PictureFormat 57 ".gif" -> PictureFormat
57 ".webp" -> PictureFormat 58 ".webp" -> PictureFormat
58 ".txt" -> PlainTextFormat 59 ".txt" -> PlainTextFormat
59 ".md" -> PlainTextFormat -- TODO: handle markdown separately 60 ".md" -> MarkdownFormat
60 ".pdf" -> PortableDocumentFormat 61 ".pdf" -> PortableDocumentFormat
61 ".wav" -> AudioFormat 62 ".wav" -> AudioFormat
62 ".oga" -> AudioFormat 63 ".oga" -> AudioFormat
@@ -100,6 +101,7 @@ itemFileProcessor maxResolution =
100 processorFor PictureFormat Nothing = 101 processorFor PictureFormat Nothing =
101 transformThenDescribe copyFileProcessor getPictureProps 102 transformThenDescribe copyFileProcessor getPictureProps
102 processorFor PlainTextFormat _ = copyResource PlainText 103 processorFor PlainTextFormat _ = copyResource PlainText
104 processorFor MarkdownFormat _ = copyResource Markdown
103 processorFor PortableDocumentFormat _ = copyResource PDF 105 processorFor PortableDocumentFormat _ = copyResource PDF
104 processorFor VideoFormat _ = copyResource Video 106 processorFor VideoFormat _ = copyResource Video
105 processorFor AudioFormat _ = copyResource Audio 107 processorFor AudioFormat _ = copyResource Audio