From 339ead1a074ea4504ecc5d6d4f2d5561e2a0a567 Mon Sep 17 00:00:00 2001 From: David Kastrup Date: Fri, 3 Jun 2016 16:46:20 +0200 Subject: [PATCH] Issue 4879: Display \time beat structure as list Example: \displayLilyMusic \time 1,2 3/4 --- scm/define-music-display-methods.scm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/scm/define-music-display-methods.scm b/scm/define-music-display-methods.scm index a3b620469d..42637cd16c 100644 --- a/scm/define-music-display-methods.scm +++ b/scm/define-music-display-methods.scm @@ -859,7 +859,11 @@ Otherwise, return #f." num den (new-line->lily-string)) (format #f - "\\time #'~a ~a/~a~a" + ;; This is silly but the latter will also work for #f + ;; and other + (if (key-list? structure) + "\\time ~{~a~^,~} ~a/~a~a" + "\\time #'~a ~a/~a~a") structure num den (new-line->lily-string))))) -- 2.39.2