some fixes
This commit is contained in:
parent
0e710215b4
commit
a64aff0c1f
|
@ -10,3 +10,5 @@ timestamp: null
|
|||
# Well hello there
|
||||
|
||||
This site is empty, you can start populating it!
|
||||
|
||||
[link test](/?link-test)
|
||||
|
|
|
@ -210,7 +210,7 @@ addGlobalMeta meta = do
|
|||
rtp <- rootedPageLink'
|
||||
pn <- pageName'
|
||||
aui <- use appendUrlIndex
|
||||
ifname <- use indexFilename
|
||||
ifi <- use indexFile
|
||||
Y.Object m <- (`objMerge` meta) <$> use extraMeta
|
||||
let l = map (\(k, v) -> (K.toText k, Mu.toMustache v)) $ KM.toList m
|
||||
pure . Mu.object
|
||||
|
@ -220,7 +220,9 @@ addGlobalMeta meta = do
|
|||
, ("pageLink", Mu.overText $ T.pack . rtp . T.unpack)
|
||||
, ("pageName", Mu.overText $ T.pack . pn . T.unpack)
|
||||
]
|
||||
++ (if aui then [("indexFilename", Mu.toMustache $ T.pack ifname )] else [])
|
||||
++ (if aui
|
||||
then [("indexFile", Mu.toMustache $ T.pack ifi)]
|
||||
else [])
|
||||
|
||||
-- | Get the expected timestamp file for a given filepath
|
||||
metadataFile :: FilePath -> Site FilePath
|
||||
|
|
Loading…
Reference in a new issue