From 08db7797d83cfb4a81b6c17602604a74a1747f8f Mon Sep 17 00:00:00 2001
From: Alexander Foremny <aforemny@posteo.de>
Date: Mon, 3 Mar 2025 16:36:59 +0100
Subject: `Protolude.map` -> `fmap`

---
 app/Main.hs | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/app/Main.hs b/app/Main.hs
index aa9ca72..5ac9b97 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -101,11 +101,11 @@ component =
     render :: (MonadDOM m, MonadUnliftIO m) => [Chat] -> H.ComponentHTML Action slots m
     render chats =
       HH.div_
-        ( Protolude.map
+        ( fmap
             ( \(index, (Chat chatMessages draft)) ->
                 HH.div_
                   [ HH.div_
-                      ( Protolude.map
+                      ( fmap
                           ( \(Message message) ->
                               HH.text message
                           )
@@ -131,7 +131,7 @@ component =
       DraftChanged index draft -> do
         modify
           ( \chats ->
-              Protolude.map
+              fmap
                 ( \(indexOther, chat) ->
                     if indexOther == index
                       then
@@ -144,7 +144,7 @@ component =
       DraftSubmitted index -> do
         modify
           ( \chats ->
-              Protolude.map
+              fmap
                 ( \(indexOther, chat) ->
                     if indexOther == index
                       then
-- 
cgit v1.2.3