aboutsummaryrefslogtreecommitdiff
path: root/specs/Specs/ViewSpec.hs
diff options
context:
space:
mode:
authorAkshay Nair <phenax5@gmail.com>2024-12-21 22:18:50 +0530
committerAkshay Nair <phenax5@gmail.com>2024-12-21 22:25:42 +0530
commitf51fbc728e4b731372e39ba19c38a35ef58fe71a (patch)
treeada2dbc2a16b6df46d446cfd9fc787d4c5a18879 /specs/Specs/ViewSpec.hs
parent1ade68e7252dda79c365cc9ec187c2bea3513cae (diff)
downloadchelleport-f51fbc728e4b731372e39ba19c38a35ef58fe71a.tar.gz
chelleport-f51fbc728e4b731372e39ba19c38a35ef58fe71a.zip
Add action repetition
Diffstat (limited to 'specs/Specs/ViewSpec.hs')
-rw-r--r--specs/Specs/ViewSpec.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/specs/Specs/ViewSpec.hs b/specs/Specs/ViewSpec.hs
index 62b49fd..285c297 100644
--- a/specs/Specs/ViewSpec.hs
+++ b/specs/Specs/ViewSpec.hs
@@ -14,6 +14,7 @@ test = do
stateIsShiftPressed = False,
stateIsMatched = False,
stateGrid = [["ABC", "DEF"], ["DJK", "JKL"]],
+ stateRepetition = 1,
stateIsDragging = False
}
let drawTextCalls = filter (\case CallDrawText {} -> True; _ -> False) . calls