diff options
Diffstat (limited to 'Types.hs')
| -rw-r--r-- | Types.hs | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -52,6 +52,7 @@ data SiteState = , _searchDataOut :: Maybe FilePath -- ^ File to write the searchable versions of pages to (as JSON) , _assetDir :: FilePath -- ^ Directory for output , _sourceDirs :: [FilePath] -- ^ Path to page source data + , _notSourceDirs :: [FilePath] -- ^ Subdirectories of source dirs where pages should not be sourced , _templateDir :: FilePath -- ^ Path to template directory , _defaultTemplate :: FilePath -- ^ Name of the default template , _redirectTemplate :: FilePath -- ^ Name of the template for redirect pages @@ -93,6 +94,11 @@ siteOptions' = do short 's' <> help "Path to the directory with source data (possibly multiple paths, defaults to a single directory \"cards\")" + _notSourceDirs <- + fmap (maybe ["assets"] toList . nonEmpty) . many . strOption $ + long "exclude-source-directory" <> + help + "Names of subdirectories of the sources that should never be used for sourcing pages (possibly multiple directory names, defaults to a single directory \"assets\")" _templateDir <- strOption $ long "template-directory" <> |