diff --git a/pages/index.md b/pages/index.md index 5fedf2c..b543ec2 100644 --- a/pages/index.md +++ b/pages/index.md @@ -10,3 +10,5 @@ timestamp: null # Well hello there This site is empty, you can start populating it! + +[link test](/?link-test) diff --git a/reploy.hs b/reploy.hs index c540d5b..b94046d 100644 --- a/reploy.hs +++ b/reploy.hs @@ -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