X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fgregorian.ly;h=e4d34f6e4c9bb37f1b02e7ccb444279f2623ba23;hb=4d405ef96a8a62771d7d9a283ff5369a772e89d8;hp=ca2b27033158e97353ffeddb91167a9829b2a0da;hpb=ec074a41f03cf4cd3b914daa1359dd6e0fb2012d;p=lilypond.git diff --git a/ly/gregorian.ly b/ly/gregorian.ly index ca2b270331..e4d34f6e4c 100644 --- a/ly/gregorian.ly +++ b/ly/gregorian.ly @@ -3,7 +3,7 @@ $Id$ %} -\version "2.17.30" +\version "2.19.22" % % Declare memorable shortcuts for special unicode characters @@ -37,12 +37,12 @@ iij = \lyricmode { iij } % Add unicode 2123 (versicle) as prefix to lyrics. versus = -#(define-music-function (parser location music) (ly:music?) +#(define-music-function (music) (ly:music?) (add-prefix-to-lyrics "℣" music)) % Add unicode 211F (response) as prefix to lyrics. responsum = -#(define-music-function (parser location music) (ly:music?) +#(define-music-function (music) (ly:music?) (add-prefix-to-lyrics "℟" music)) % @@ -151,7 +151,7 @@ circulus = #(make-articulation "circulus") % it is applied by one. % augmentum = -#(define-music-function (parser location expr) (ly:music?) +#(define-music-function (expr) (ly:music?) (shift-duration-log expr 0 1)) %