aboutsummaryrefslogtreecommitdiff
path: root/Types.hs
diff options
context:
space:
mode:
authorRonan Tremoureux <ronan.tremoureux@ext.uni.lu>2023-06-22 09:13:37 +0200
committerRonan Tremoureux <ronan.tremoureux@ext.uni.lu>2023-06-22 09:13:37 +0200
commit73d1920b6296bf73fbef87c9e8460cd5d2c2071e (patch)
treec5eb1d3c6eb61e9c565e9c46431de3bd6872d686 /Types.hs
parentfa3612d3fc78d0d88750278f825d0d0cd830e9da (diff)
parente44c0d35b49d130a9ff8d7f0a244b76bf7d54259 (diff)
downloadreploy-73d1920b6296bf73fbef87c9e8460cd5d2c2071e.tar.gz
reploy-73d1920b6296bf73fbef87c9e8460cd5d2c2071e.tar.bz2
Merge branch 'mk-dont-source-assets' into 'master'
avoid source dirs Closes #4 See merge request R3-core/websites-dev/reploy!2
Diffstat (limited to 'Types.hs')
-rw-r--r--Types.hs6
1 files changed, 6 insertions, 0 deletions
diff --git a/Types.hs b/Types.hs
index f4212d8..58a8197 100644
--- a/Types.hs
+++ b/Types.hs
@@ -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" <>