From 1af002a26299daf2881c28b3d8366a354cffa5da Mon Sep 17 00:00:00 2001
From: Neil Puttock <n.puttock@gmail.com>
Date: Sun, 26 Sep 2010 01:31:16 +0100
Subject: [PATCH] Ensure \displayMusic renders scheme args in markup correctly.

* scm/music-functions.scm (markup-expression->make-markup):

  funnel scheme arguments through music->make-music to handle quoting for
  lists and pairs
---
 scm/music-functions.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scm/music-functions.scm b/scm/music-functions.scm
index 4a322b5b50..95587b8670 100644
--- a/scm/music-functions.scm
+++ b/scm/music-functions.scm
@@ -134,7 +134,7 @@ For instance,
 	  ((and (not (string? arg)) (markup? arg)) ;; a markup
 	   (inner-markup->make-markup arg))
 	  (else					 ;; scheme arg
-	   arg)))
+	   (music->make-music arg))))
   (define (inner-markup->make-markup mrkup)
     (if (string? mrkup)
 	`(#:simple ,mrkup)
-- 
2.39.5