diff options
Diffstat (limited to 'website/sandbox/chord-drill-sergeant/src/ChordInspector.elm')
| -rw-r--r-- | website/sandbox/chord-drill-sergeant/src/ChordInspector.elm | 14 |
1 files changed, 2 insertions, 12 deletions
diff --git a/website/sandbox/chord-drill-sergeant/src/ChordInspector.elm b/website/sandbox/chord-drill-sergeant/src/ChordInspector.elm index 809894f2c2b0..f43b534eb013 100644 --- a/website/sandbox/chord-drill-sergeant/src/ChordInspector.elm +++ b/website/sandbox/chord-drill-sergeant/src/ChordInspector.elm @@ -1,6 +1,7 @@ module ChordInspector exposing (render) import Html exposing (..) +import NoteInspector import Theory @@ -11,15 +12,4 @@ render chord = p [] [ text "Cannot retrieve the notes for the chord." ] Just notes -> - ul [] - (notes - |> List.map - (\note -> - li [] - [ text - (Theory.viewNote - note - ) - ] - ) - ) + NoteInspector.render notes |