From: Neil Puttock Date: Tue, 17 Mar 2009 17:46:23 +0000 (+0000) Subject: Docs: compile fix. X-Git-Tag: release/2.13.1-1~63^2~11 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=58318dbf7e2d2418b72f05c0e1b4aab87328972d;p=lilypond.git Docs: compile fix. --- diff --git a/ly/music-functions-init.ly b/ly/music-functions-init.ly index 6dd33a5fdf..f14f543001 100644 --- a/ly/music-functions-init.ly +++ b/ly/music-functions-init.ly @@ -649,12 +649,10 @@ resetRelativeOctave = scaleDurations = -#(define-music-function - (parser location fraction music) (number-pair? ly:music?) - (ly:music-compress music - (_i "Multiply the duration of events in @var{music} by @var{fraction}.") - - (ly:make-moment (car fraction) (cdr fraction)))) +#(define-music-function (parser location fraction music) (number-pair? ly:music?) + (_i "Multiply the duration of events in @var{music} by @var{fraction}.") + (ly:music-compress music + (ly:make-moment (car fraction) (cdr fraction))))