song2: keys: Print note names.
[music/pretentious.git] / 02-song2 / parts / keys.ly
index 7fbecc49c34b253cc5fe13475e644ba4ced646e3..c966ef8ccb76ad8a55cf727874cc82a1904e3c95 100644 (file)
 \include "../music/keys.ly"
 
 \score {
-  \new Staff \with {
+  \new PianoStaff = "keyboard" \with {
     pedalSustainStyle = #'bracket
   } {
-    \tempo 4 = 90
-    \compressMMRests { \keyboard }
+    <<
+      \new Staff {
+        <<
+          \tempo 4 = 90
+          \clef treble
+          \compressMMRests \keyboard
+          \context NoteNames = "upper" {
+            \set printOctaveNames = ##f
+            \compressMMRests \keyboard
+          }
+        >>
+      }
+    >>
   }
   \layout {
     indent = #0