about summary refs log tree commit diff
path: root/website/sandbox/learnpianochords
diff options
context:
space:
mode:
authorWilliam Carroll <wpcarro@gmail.com>2020-04-18T23·31+0100
committerWilliam Carroll <wpcarro@gmail.com>2020-04-18T23·31+0100
commit8620d86fd00d78e3f67de2a7662a881edf37394c (patch)
treee03d31febd3413b0cac4af5291a922f8bf36649c /website/sandbox/learnpianochords
parent11b140b6ae9e65b26c33968596a30a0449ec1afa (diff)
Prune {Select,Deselect}AllKeys actions
Removing more unused code attempting to focus this app's scope.
Diffstat (limited to 'website/sandbox/learnpianochords')
-rw-r--r--website/sandbox/learnpianochords/src/State.elm19
1 files changed, 0 insertions, 19 deletions
diff --git a/website/sandbox/learnpianochords/src/State.elm b/website/sandbox/learnpianochords/src/State.elm
index fa08f9441893..cce3c34eb38e 100644
--- a/website/sandbox/learnpianochords/src/State.elm
+++ b/website/sandbox/learnpianochords/src/State.elm
@@ -17,8 +17,6 @@ type Msg
     | ToggleKey Theory.Key
     | DoNothing
     | SetPracticeMode PracticeMode
-    | SelectAllKeys
-    | DeselectAllKeys
     | SetView View
 
 
@@ -125,23 +123,6 @@ update msg model =
             , Cmd.none
             )
 
-        SelectAllKeys ->
-            ( { model
-                | whitelistedKeys = Theory.allKeys
-                , whitelistedChords =
-                    Theory.allKeys |> List.concatMap Theory.chordsForKey
-              }
-            , Cmd.none
-            )
-
-        DeselectAllKeys ->
-            ( { model
-                | whitelistedKeys = []
-                , whitelistedChords = []
-              }
-            , Cmd.none
-            )
-
         NewChord chord ->
             ( { model | selectedChord = Just chord }
             , Cmd.none