]> git.donarmstrong.com Git - lilypond.git/blobdiff - Documentation/snippets/new/score-for-diatonic-accordion.ly
CG: put release update in staging
[lilypond.git] / Documentation / snippets / new / score-for-diatonic-accordion.ly
index 8e1ede90bf3ad0290f231e6793365de8820096a1..2bae67087e409a7c6534ec7c2f25ca6ae8f5ebf7 100644 (file)
@@ -1,4 +1,4 @@
-\version "2.15.15"
+\version "2.15.20"
 
 \header {
   lsrtags = "template"
@@ -176,7 +176,7 @@ staffVoice = \new Staff = astaffvoice  {
 
 staffAccordionMel =
 \new Staff  \with { \remove "Clef_engraver" } {
-  #(set-accidental-style 'forget) %Set the accidentals (Vorzeichen) for each note,
+  \accidentalStyle "forget" %Set the accidentals (Vorzeichen) for each note,
   %do not remember them for the rest of the measure.
   \time 4/4
   \set Staff.instrumentName="Accordion"
@@ -188,9 +188,9 @@ staffAccordionMel =
 
 AltOn =
 #(define-music-function (parser location mag) (number?)
-  #{ \override Stem #'length = #$(* 7.0 mag)
+  #{ \override Stem #'length = #(* 7.0 mag)
       \override NoteHead #'font-size =
-#$(inexact->exact (* (/ 6.0 (log 2.0)) (log mag))) #})
+#(inexact->exact (* (/ 6.0 (log 2.0)) (log mag))) #})
 
 AltOff = {
   \revert Stem #'length