From 98e177ea752f6e90f65bb7bf6c552b8cf738d134 Mon Sep 17 00:00:00 2001
From: depsterr <depsterr@protonmail.com>
Date: Mon, 20 Sep 2021 15:50:00 +0200
Subject: [PATCH] correct comment

---
 src/Kino/Request.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Kino/Request.hs b/src/Kino/Request.hs
index b3cd6be..26ef564 100644
--- a/src/Kino/Request.hs
+++ b/src/Kino/Request.hs
@@ -37,7 +37,7 @@ defaultOptions :: WR.Options
 defaultOptions = defaults & param "limit" .~ ["50"]
                           & param "page"  .~ ["1"]
 
--- | Updates the state given a way to request a new movie listing
+-- | Updates the state following a new movie request
 setMovies :: AppS -> IO AppS
 setMovies s = do
   m <- getMovies ((s ^. appReqOpts) & param "page" .~ [T.pack (show (s ^. appPage))])