diff options
author | William Carroll <wpcarro@gmail.com> | 2020-04-18T23·31+0100 |
---|---|---|
committer | William Carroll <wpcarro@gmail.com> | 2020-04-18T23·31+0100 |
commit | 8620d86fd00d78e3f67de2a7662a881edf37394c (patch) | |
tree | e03d31febd3413b0cac4af5291a922f8bf36649c /website/sandbox/learnpianochords/src | |
parent | 11b140b6ae9e65b26c33968596a30a0449ec1afa (diff) |
Prune {Select,Deselect}AllKeys actions
Removing more unused code attempting to focus this app's scope.
Diffstat (limited to 'website/sandbox/learnpianochords/src')
-rw-r--r-- | website/sandbox/learnpianochords/src/State.elm | 19 |
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 |