From: David Kastrup <dak@gnu.org>
Date: Tue, 13 Sep 2011 14:41:45 +0000 (+0200)
Subject: music-functions.scm: allow dotted argument lists for music functions
X-Git-Tag: release/2.15.12-1~49
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=394d478785693479c90a25b8d27399ee128e574b;p=lilypond.git

music-functions.scm: allow dotted argument lists for music functions
---

diff --git a/scm/music-functions.scm b/scm/music-functions.scm
index 1d88c4f0db..4f79a2bae3 100644
--- a/scm/music-functions.scm
+++ b/scm/music-functions.scm
@@ -770,11 +770,11 @@ Syntax:
       (let ((docstring (cadar body))
 	    (body (cdr body)))
 	`(ly:make-music-function (list ,type ,@signature)
-				 (lambda (,@args)
+				 (lambda ,args
 				   ,docstring
 				   ,@body)))
       `(ly:make-music-function (list ,type ,@signature)
-			       (lambda (,@args)
+			       (lambda ,args
 				 ,@body))))
 
 (defmacro-public define-music-function rest