diff --git a/message-index/CNAME b/message-index/CNAME
new file mode 100644
index 00000000..566b5df8
--- /dev/null
+++ b/message-index/CNAME
@@ -0,0 +1 @@
+errors.haskell.org
\ No newline at end of file
diff --git a/message-index/site.hs b/message-index/site.hs
index 49239a25..5850f244 100644
--- a/message-index/site.hs
+++ b/message-index/site.hs
@@ -23,6 +23,10 @@ import Text.Pandoc.Definition (Meta (..), MetaValue (..), Pandoc (..))
 
 main :: IO ()
 main = hakyll $ do
+  match "CNAME" $ do
+    route idRoute
+    compile copyFileCompiler
+
   match "images/*" $ do
     route idRoute
     compile copyFileCompiler