diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/ConfigFile.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/ConfigFile.hs b/src/ConfigFile.hs index 8b23582..a1d3662 100644 --- a/src/ConfigFile.hs +++ b/src/ConfigFile.hs | |||
@@ -57,6 +57,7 @@ data DiskImageConfig = DiskImageConfig { | |||
57 | , unpackOnly :: Bool | 57 | , unpackOnly :: Bool |
58 | , binaries :: Vector Text | 58 | , binaries :: Vector Text |
59 | , chrootCommands :: Vector Text | 59 | , chrootCommands :: Vector Text |
60 | , skelFiles :: Vector Text | ||
60 | } deriving (Show, Read) | 61 | } deriving (Show, Read) |
61 | 62 | ||
62 | parsePackageName :: Text -> Package | 63 | parsePackageName :: Text -> Package |
@@ -71,6 +72,7 @@ diskImageConfigParser = object $ | |||
71 | <*> defaultField "unpack-only" False bool | 72 | <*> defaultField "unpack-only" False bool |
72 | <*> defaultField "binaries" Vector.empty (array string) | 73 | <*> defaultField "binaries" Vector.empty (array string) |
73 | <*> defaultField "chroot-commands" Vector.empty (array string) | 74 | <*> defaultField "chroot-commands" Vector.empty (array string) |
75 | <*> defaultField "skel-files" Vector.empty (array string) | ||
74 | 76 | ||
75 | readCfg :: FilePath -> Action DiskImageConfig | 77 | readCfg :: FilePath -> Action DiskImageConfig |
76 | readCfg yaml = either error id . parse diskImageConfigParser . encodeUtf8 . pack <$> readFile' yaml | 78 | readCfg yaml = either error id . parse diskImageConfigParser . encodeUtf8 . pack <$> readFile' yaml |