X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Flily-in-scheme.ly;h=fdf6da5ee2e455313d4c4d9fac6dd63713cb5b7c;hb=cce6142535a66c88811f7f9f28eba89b8fc3b9a3;hp=cc59cbd152beacd23438231400e1eb9831656637;hpb=f25b23eb6fbbf83489dfac39f1908ab13a75b4b9;p=lilypond.git diff --git a/input/regression/lily-in-scheme.ly b/input/regression/lily-in-scheme.ly index cc59cbd152..fdf6da5ee2 100644 --- a/input/regression/lily-in-scheme.ly +++ b/input/regression/lily-in-scheme.ly @@ -12,20 +12,20 @@ the @code{TextScript} grob. } -\version "2.17.6" +\version "2.19.22" \layout { ragged-right = ##t } -withPaddingA = #(define-music-function (parser location padding music) (number? ly:music?) +withPaddingA = #(define-music-function (padding music) (number? ly:music?) #{ \override TextScript.padding = #padding $music \revert TextScript.padding #}) -withPaddingB = #(define-music-function (parser location padding music) (number? ly:music?) +withPaddingB = #(define-music-function (padding music) (number? ly:music?) #{ \override TextScript.padding = #(* padding 2) $music \revert TextScript.padding #}) -withPaddingC = #(define-music-function (parser location padding music) (number? ly:music?) +withPaddingC = #(define-music-function (padding music) (number? ly:music?) #{ \override TextScript.padding = #(+ 1 (* padding 2)) $music \revert TextScript.padding #})