boernel/lilypond-common-includes
14
0
Fork 0
Code Issues 18 Pull Requests 1 Packages Projects Releases Wiki Activity

Compare commits

base: boernel:39e20d60ed70ba98867869dcebbf7ae3220383c2
Branches Tags
boernel:main
boernel:adaption
boernel:set-spacing-for-rests-in-chordlyrics
boernel:tocSubtitleText-Variable
..
compare: boernel:58020caf9bd428fa87b8d50013280d982f02292b
Branches Tags
boernel:main
boernel:adaption
boernel:set-spacing-for-rests-in-chordlyrics
boernel:tocSubtitleText-Variable

3 Commits
39e20d60ed ... 58020caf9b

Author SHA1 Message Date
tux
58020caf9b set spacing for rests in chordlyrics 2024-07-19 14:33:06 +02:00
tux
81a5676965 more precise Links in PDF toc 2024-07-19 14:32:41 +02:00
tux
5ee1a7b6be show year also for same author on text and melody 2024-07-17 13:34:00 +02:00
2 changed files with 6 additions and 3 deletions
Show Stats Expand all files Collapse all files

5
footer_with_songinfo.ly
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

4
toc_include.ly
View File

@ -167,11 +167,11 @@
(reverse (map (lambda (m) (reverse (map (lambda (m)
(make-size-box-to-box-markup #f #t m target-size-markup)) (make-size-box-to-box-markup #f #t m target-size-markup))
(cons (cons
(make-fill-with-pattern-markup 1 RIGHT "." (car revlist) page) (make-with-link-symbol-ref-markup 'index:label (make-fill-with-pattern-markup 1 RIGHT "." (car revlist) page))
(cdr revlist))))))))) (cdr revlist)))))))))
\paper { \paper {
indexItemMarkup = \markup \with-link-symbol-ref #'index:label { indexItemMarkup = \markup {
\index-item-with-pattern \index-item-with-pattern
} }
indexSectionMarkup = \markup \override #'(baseline-skip . 1.5) \left-column { indexSectionMarkup = \markup \override #'(baseline-skip . 1.5) \left-column {