show year also for same author on text and melody

This commit is contained in:
tux 2024-07-17 13:34:00 +02:00
parent 162d32c53d
commit 5ee1a7b6be

View File

@ -104,7 +104,10 @@
) )
(if (and (equal? poetIds composerIds) (null? translatorIds) (null? versePoetData) (null? verseComposerData) (null? voiceComposerData) (null? compositionIds) (null? bridgeIds) (null? interludeIds)) (if (and (equal? poetIds composerIds) (null? translatorIds) (null? versePoetData) (null? verseComposerData) (null? voiceComposerData) (null? compositionIds) (null? bridgeIds) (null? interludeIds))
(list (list
(render-contribution-group (ly:output-def-lookup layout 'poetAndComposerEqualPrefix) poetIds) (join-present (list
(render-contribution-group (ly:output-def-lookup layout 'poetAndComposerEqualPrefix) poetIds)
(if (equal? year_text year_melody) year_text (join-present (list year_text year_melody) "/"))
) ", ")
#f) #f)
(list (list
(if (and (null? poetIds) (null? versePoetData) (null? translatorIds)) #f (if (and (null? poetIds) (null? versePoetData) (null? translatorIds)) #f