X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fchord-repetition-init.ly;h=1e3c7ad1056dab7c36c7dca5f63c3040f01aa8c0;hb=97a0169312a260933246ab224e4f8b0969871dd5;hp=8cef71025069ab217cddc3d5a4b2786a81880bc7;hpb=02a883ede0729365c92042cfaa003e82c834054a;p=lilypond.git diff --git a/ly/chord-repetition-init.ly b/ly/chord-repetition-init.ly index 8cef710250..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 - '(string-number-event fingering-event))) + (ly:parser-define! '$chord-repeat-events + '(string-number-event fingering-event)))