diff options
Diffstat (limited to 'compiler/src/Config.hs')
-rw-r--r-- | compiler/src/Config.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/src/Config.hs b/compiler/src/Config.hs index d025afd..ca3259f 100644 --- a/compiler/src/Config.hs +++ b/compiler/src/Config.hs | |||
@@ -42,6 +42,7 @@ import Resource (Resolution(..)) | |||
42 | 42 | ||
43 | data CompilerConfig = CompilerConfig | 43 | data CompilerConfig = CompilerConfig |
44 | { galleryName :: String | 44 | { galleryName :: String |
45 | , ignoreFiles :: String | ||
45 | , implicitDirectoryTag :: Bool | 46 | , implicitDirectoryTag :: Bool |
46 | , thumbnailResolution :: Resolution | 47 | , thumbnailResolution :: Resolution |
47 | , pictureMaxResolution :: Maybe Resolution | 48 | , pictureMaxResolution :: Maybe Resolution |
@@ -50,6 +51,7 @@ data CompilerConfig = CompilerConfig | |||
50 | instance FromJSON CompilerConfig where | 51 | instance FromJSON CompilerConfig where |
51 | parseJSON = withObject "CompilerConfig" $ \v -> CompilerConfig | 52 | parseJSON = withObject "CompilerConfig" $ \v -> CompilerConfig |
52 | <$> v .:? "galleryName" .!= "Gallery" | 53 | <$> v .:? "galleryName" .!= "Gallery" |
54 | <*> v .:? "ignoreFiles" .!= ".^" | ||
53 | <*> v .:? "implicitDirectoryTag" .!= False | 55 | <*> v .:? "implicitDirectoryTag" .!= False |
54 | <*> v .:? "thumbnailResolution" .!= (Resolution 400 400) | 56 | <*> v .:? "thumbnailResolution" .!= (Resolution 400 400) |
55 | <*> v .:? "pictureMaxResolution" | 57 | <*> v .:? "pictureMaxResolution" |