diff --git a/README.md b/README.md
index b30363d..dcd6d49 100644
--- a/README.md
+++ b/README.md
@@ -4,9 +4,9 @@ To run:
 * install [Haskell](https://www.haskell.org/ghcup/)
 ``` sh
     # assuming you manage ghc with ghcup
-    # if not, set ghc 9.4.5 by other means
-    ghcup install ghc 9.4.5
-    ghcup set ghc 9.4.5
+    # if not, set ghc 9.6.1 by other means
+    ghcup install ghc 9.6.1
+    ghcup set ghc 9.6.1
     
     cabal run rcv-site
 ```
diff --git a/src/Main.hs b/src/Main.hs
index 83ba781..81db7a1 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -215,7 +215,10 @@ convertMarkdown path = do
     Left err -> liftIO . fail . show $ err
     Right (rst :: C.Html ()) -> pure . TL.toStrict . C.renderHtml $ rst
 
-emptyApp _ respond = respond $ NW.responseLBS TS.status200 [] "redirecting to https"
+
+-- we need a WAI application for the redirect middleware to act on
+emptyApp :: p -> (NW.Response -> b) -> b
+emptyApp _ respondf = respondf $ NW.responseLBS TS.status200 [] "redirecting to https"
 
 main :: IO ()
 main = do