From c3743de8d86f2e272c9dc5b9db9a6eabdd321d15 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Roman=20Smr=C5=BE?= Date: Tue, 31 Mar 2026 20:50:15 +0200 Subject: Extra container around conversation list and invite link --- src/Main.hs | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/src/Main.hs b/src/Main.hs index 55f677d..69a4c96 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -114,11 +114,12 @@ setup = do H.div ! A.id "conversations" $ do H.h2 $ do "Conversations" - H.div ! A.id "conversation_list" $ return () - H.ul $ do - H.li ! A.id "create_invite_item" $ do - H.a ! A.href "#create-invite" $ do - "Invite contact" + H.div ! A.id "conversations_inner" $ do + H.div ! A.id "conversation_list" $ return () + H.ul $ do + H.li ! A.id "create_invite_item" $ do + H.a ! A.href "#create-invite" $ do + "Invite contact" H.div ! A.id "peers" ! A.class_ "collapsed" $ do H.h2 $ do -- cgit v1.2.3