aboutsummaryrefslogtreecommitdiff
path: root/specs/Specs/ViewSpec.hs
diff options
context:
space:
mode:
authorAkshay Nair <phenax5@gmail.com>2024-12-28 14:53:58 +0530
committerAkshay Nair <phenax5@gmail.com>2024-12-28 14:53:58 +0530
commit568923344f0941b2771459dd8dbe935ac971a968 (patch)
tree54a07e8a3c25c85b299fe9d9273620972f03b508 /specs/Specs/ViewSpec.hs
parentb8c389eac5f875fc7ae9a5ab9ac446d24a079448 (diff)
downloadchelleport-568923344f0941b2771459dd8dbe935ac971a968.tar.gz
chelleport-568923344f0941b2771459dd8dbe935ac971a968.zip
Allow clicking with enter
Diffstat (limited to 'specs/Specs/ViewSpec.hs')
-rw-r--r--specs/Specs/ViewSpec.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/specs/Specs/ViewSpec.hs b/specs/Specs/ViewSpec.hs
index 79c8173..f3cfdf2 100644
--- a/specs/Specs/ViewSpec.hs
+++ b/specs/Specs/ViewSpec.hs
@@ -3,12 +3,13 @@ module Specs.ViewSpec where
import Chelleport.Config
import Chelleport.Types
import Chelleport.View
+import Data.Default (Default (def))
import Test.Hspec
import TestUtils
test :: SpecWith ()
test = do
- let defaultState = defaultAppState {stateGrid = [["ABC", "DEF"], ["DJK", "JKL"]]}
+ let defaultState = def {stateGrid = [["ABC", "DEF"], ["DJK", "JKL"]]}
describe "#render" $ do
context "when key sequence is empty" $ do