From a7b1a6fa341333d40f4a38bacc372d8717545869 Mon Sep 17 00:00:00 2001 From: Mike Solomon Date: Tue, 4 Oct 2011 15:35:35 +0200 Subject: [PATCH] Fixes the handling of unpure-pure containers in call-pure-function --- scm/define-grobs.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scm/define-grobs.scm b/scm/define-grobs.scm index db39b6889c..05ba013e27 100644 --- a/scm/define-grobs.scm +++ b/scm/define-grobs.scm @@ -2701,7 +2701,7 @@ (ly:eval-simple-closure (car args) unpure start end) (if (not (procedure? unpure)) unpure - (apply (cdr pure) + (apply unpure (append (list (car args) start end) (cdr args)))))) -- 2.39.5