From 09c89537283183f0ccff51b98d1d7eb8b92879ac Mon Sep 17 00:00:00 2001
From: Jonathan Lamothe <jonathan@jlamothe.net>
Date: Thu, 1 Aug 2024 16:17:47 -0400
Subject: [PATCH] actually display the cursor

---
 src/Hamming/App.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Hamming/App.hs b/src/Hamming/App.hs
index 8f304da..dc54686 100644
--- a/src/Hamming/App.hs
+++ b/src/Hamming/App.hs
@@ -27,7 +27,7 @@ License along with this program.  If not, see
 module Hamming.App (mainApp, initialState) where
 
 import Brick.AttrMap (attrMap)
-import Brick.Main (App (..), neverShowCursor)
+import Brick.Main (App (..), showFirstCursor)
 import Brick.Util (fg, style)
 import Graphics.Vty.Attributes (bold)
 import Graphics.Vty.Attributes.Color (green, red)
@@ -40,7 +40,7 @@ import Hamming.App.Widgets
 mainApp :: App AppState () ResName
 mainApp = App
   { appDraw         = drawFunc
-  , appChooseCursor = neverShowCursor
+  , appChooseCursor = showFirstCursor
   , appHandleEvent  = eventHandler
   , appStartEvent   = return ()
   , appAttrMap      = const $ attrMap (style 0)