X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Fdefining-an-engraver-in-scheme--ambitus-engraver.ly;h=f284dd6d0593c2a1640080accb9b593156d689cc;hb=67e08daacdeb384724e18a31597d9d828ac40f51;hp=30bc1dfeeacb5876a83bea0780b98d995ee50741;hpb=9fe18536fe333c167fe1bd87f76a30b20f603dd0;p=lilypond.git diff --git a/Documentation/snippets/defining-an-engraver-in-scheme--ambitus-engraver.ly b/Documentation/snippets/defining-an-engraver-in-scheme--ambitus-engraver.ly index 30bc1dfeea..f284dd6d05 100644 --- a/Documentation/snippets/defining-an-engraver-in-scheme--ambitus-engraver.ly +++ b/Documentation/snippets/defining-an-engraver-in-scheme--ambitus-engraver.ly @@ -4,21 +4,10 @@ % and then run scripts/auxiliar/makelsr.py % % This file is in the public domain. -%% Note: this file works from version 2.15.31 -\version "2.15.31" +%% Note: this file works from version 2.19.7 +\version "2.19.7" \header { -%% Translation of GIT committish: 30339cb3706f6399c84607426988b25f79b4998c - texidocfr = " -Cet exemple démontre comment définir son propre graveur de tessiture à -base de code Scheme. - -Il s'agit d'une réécriture en Scheme du code contenu dans le fichier -@file{lily/ambitus-engraver.cc}. - -" - doctitlefr = "Définition d'un graveur en Scheme : graveur d'ambitus" - lsrtags = "contexts-and-engravers" @@ -195,7 +184,7 @@ position of middle C and key signature from @var{translator}'s context." 0)) (set! (ambitus-start-key-sig ambitus) (ly:context-property (ly:translator-context translator) - 'keySignature))))) + 'keyAlterations))))) #(define-method (update-ambitus-notes (ambitus ) note-grob) "Update the upper and lower ambitus pithes of @var{ambitus}, using