diff --git a/src/HTML.hs b/src/HTML.hs
index 25efb21..c2d5fed 100644
--- a/src/HTML.hs
+++ b/src/HTML.hs
@@ -14,7 +14,7 @@ import Control.Monad.Reader (ReaderT, asks)
 import qualified Data.Map as Map (elems)
 import qualified Data.Text.Lazy.IO as TextIO (writeFile)
 import DOM (page)
-import Lucid
+import Lucid (renderTextT)
 import Pretty ((.$))
 import System.FilePath.Posix ((</>), (<.>))
 
@@ -22,12 +22,12 @@ articlesLists :: Monad m => Collection -> ReaderT Blog m [(FilePath, ArticlesLis
 articlesLists (Collection {articlesFeatured, basePath, tag}) = do
   limit <- take <$> (asks $skin.$previewArticlesCount)
   return [
-        (basePath </> "index.html", ArticlesList {
+        (basePath </> "index" <.> "html", ArticlesList {
               tagged = tag
             , full = False
             , featured = limit articlesFeatured
           })
-      , (basePath </> "all.html", ArticlesList {
+      , (basePath </> "all" <.> "html", ArticlesList {
               tagged = tag
             , full = True
             , featured = articlesFeatured