Do not require flipping of empty definition card

Yvee1 · Dec 17, 2023 · d0f56b8 · d0f56b8
1 parent 5e14b17
commit d0f56b8
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/UI/Cards.hs b/src/UI/Cards.hs
@@ -261,10 +261,10 @@ handleEvent (VtyEvent e) =
       s <- use cs
       flip (`maybe` (`handlePopupEvent` ev)) pUp $
         case (s ^. cardState, s ^. currentCard) of
-          (DefinitionState{_flipped = f}, _) ->
+          (DefinitionState{_flipped = f}, Definition {definition = d}) ->
             case ev of
               V.EvKey V.KEnter []  ->
-                if f
+                if f || all isSpace d 
                   then if not (s^.reviewMode) then next
                     else cs.popup ?= correctPopup
                   else cs.cardState.flipped %= not