From 335c43c5eb578f0d1749366b29d02e97da493a45 Mon Sep 17 00:00:00 2001
From: Amitai Burstein <amitai@gizra.com>
Date: Fri, 17 Nov 2023 18:06:09 +0200
Subject: [PATCH] Update Guide/database.markdown

---
 Guide/database.markdown | 1 -
 1 file changed, 1 deletion(-)

diff --git a/Guide/database.markdown b/Guide/database.markdown
index 20404a068..13bc6e16b 100644
--- a/Guide/database.markdown
+++ b/Guide/database.markdown
@@ -393,7 +393,6 @@ Then, in our controller, we can execute the query:
 ```haskell
 -- Web/Controller/Projects.hs
 action ProjectsAction = do
-    -- let pairs = projects |> fmap (\project -> (project.projectType, project.participants))
     let pairs = [(ProjectTypeOngoing, 1 :: Int), (ProjectTypeFinished, 2)]
     projects :: [Project] <- sqlQuery "SELECT * FROM projects WHERE (project_type, participants) IN ?" (Only $ In pairs)