remove fancy routes

This commit is contained in:
2026-04-04 00:02:41 +08:00
parent f2424c043b
commit 54e5186a21
+1 -11
View File
@@ -9,16 +9,6 @@ import Hakyll
import System.FilePath
import Text.Pandoc
--------------------------------------------------------------------------------
-- https://www.rohanjain.in/hakyll-clean-urls/
cleanRoute :: Routes
cleanRoute = customRoute createIndexRoute
where
createIndexRoute ident = takeDirectory p </> takeBaseName p </> "index.html"
where
p = toFilePath ident
--------------------------------------------------------------------------------
config :: Configuration
config =
defaultConfiguration
@@ -52,7 +42,7 @@ main = hakyllWith config $ do
compile compressCssCompiler
match "notes/*" $ do
route cleanRoute
route $ setExtension "html"
compile $ do
tocCtx <- getTocCtx defaultContext
chaoDocCompiler