Issue 5167/1: Reorganize markup commands to use object properties

[lilypond.git] / input / regression / note-names.ly

diff --git a/input/regression/note-names.ly b/input/regression/note-names.ly
index eb0e1ec9eeca3c062521b62e24d810053784114d..972ebb1d021a06119630c7093588c83247fd095f 100644 (file)
--- a/input/regression/note-names.ly
+++ b/input/regression/note-names.ly
@@ -1,28 +1,28 @@
+\version "2.19.38"
 
-\header
-{
+\header {
   texidoc = "Various languages are supported for note names input.
 Selecting another language within a music expression is possible,
 and doesn't break point-and-click abilities.
 "
 }
 
-\version "2.13.37"
 
+%% Old syntax.
 \include "english.ly"
 
-\relative c'' {
-  g bf d c
+\relative {
+  g'4 bf d c
 
-  %% nederlands.ly is loaded by default, so the
-  %% dutchPitchnames variable is already defined.
+  %% Manual override of the pitchnames variable
+  %% and the parser note names:
   #(begin
-    (set! pitchnames dutchPitchnames)
-    (ly:parser-set-note-names parser dutchPitchnames))
-  bes a g fis
+    (set! pitchnames (ly:assoc-get 'nederlands language-pitch-names))
+    (ly:parser-set-note-names pitchnames))
+  bes4 a g fis
 
-  %% The \language command just retrieves a pitches alist
-  %% from the relevant file, and sets pitchnames accordingly.
-  \language "italiano"
-  sol fa mib re
-}
\ No newline at end of file
+  %% The \language command acts in the same way:
+  \language "français"
+  %% Accented characters are supported in some languages:
+  sol4 fa mib ré
+}