X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fchord-repetition-init.ly;h=1e3c7ad1056dab7c36c7dca5f63c3040f01aa8c0;hb=97a0169312a260933246ab224e4f8b0969871dd5;hp=70d7b6c26d32260695de3d93720cefec3643a78f;hpb=ec074a41f03cf4cd3b914daa1359dd6e0fb2012d;p=lilypond.git diff --git a/ly/chord-repetition-init.ly b/ly/chord-repetition-init.ly index 70d7b6c26d..1e3c7ad105 100644 --- a/ly/chord-repetition-init.ly +++ b/ly/chord-repetition-init.ly @@ -1,5 +1,5 @@ %%% -*- Mode: Scheme -*- -\version "2.16.0" +\version "2.19.22" %{ Chord repetition behavior is not customizable in the parser. That is due to it usually being done by the toplevel music handler @@ -15,7 +15,7 @@ %} chordRepeats = -#(define-music-function (parser location event-types music) +#(define-music-function (event-types music) ((list? '()) ly:music?) "Walk through @var{music} putting the notes of the previous chord into repeat chords, as well as an optional list of @var{event-types} @@ -23,7 +23,7 @@ such as @code{#'(string-number-event)}." (expand-repeat-chords! (cons 'rhythmic-event event-types) music)) tabChordRepeats = -#(define-music-function (parser location event-types music) +#(define-music-function (event-types music) ((list? '()) ly:music?) "Walk through @var{music} putting the notes, fingerings and string numbers of the previous chord into repeat chords, as well as an @@ -34,8 +34,8 @@ optional list of @var{event-types} such as @code{#'(articulation-event)}." #}) tabChordRepetition = -#(define-void-function (parser location) () +#(define-void-function () () (_i "Include the string and fingering information in a chord repetition. This function is deprecated; try using @code{\\tabChordRepeats} instead.") - (ly:parser-define! parser '$chord-repeat-events + (ly:parser-define! '$chord-repeat-events '(string-number-event fingering-event)))