From b376b419549015087a20b6a4d67e94b274cf682f Mon Sep 17 00:00:00 2001 From: Han-Wen Nienhuys Date: Tue, 2 Jan 2007 16:34:34 +0100 Subject: [PATCH] also work with -ddump-profile. --- scm/lily.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/scm/lily.scm b/scm/lily.scm index 8f2b1e1873..d2b3ea95e7 100644 --- a/scm/lily.scm +++ b/scm/lily.scm @@ -568,7 +568,7 @@ The syntax is the same as `define*-public'." )) (let* ((failed '()) - (start-measurements (ly:get-option 'profile-measurements)) + (start-measurements (ly:get-option 'dump-profile)) (handler (lambda (key failed-file) (set! failed (append (list failed-file) failed))))) @@ -579,7 +579,7 @@ The syntax is the same as `define*-public'." (if start-measurements (set! start-measurements (profile-measurements))) (lilypond-file handler x) - (if (ly:get-option 'dump-profile) + (if start-measurements (dump-profile x start-measurements (profile-measurements))) -- 2.39.5