bessere Transliteration für europäische Sonderzeichen

This commit is contained in:
2025-11-01 10:29:29 +01:00
parent b2f1a7dc86
commit 7c92c65c82
3 changed files with 68 additions and 13 deletions

View File

@@ -61,20 +61,9 @@
;; We insert index items sorted from the beginning on and do
;; not sort them later - this saves pretty much computing time
(insert-alphabetical-sorted! (list label markup-symbol textoptions
;; this crazy hack is necessary because lilypond depends on guile 1.8 atm
;; and so the cool unicode conversion functions cannot be used
(ly:string-substitute " " ""
(ly:string-substitute "" ""
(ly:string-substitute "Č" "C"
(ly:string-substitute "Đ" "D"
(ly:string-substitute "Š" "S"
(ly:string-substitute "Т" "T"
(ly:string-substitute "Ä" "Ae"
(ly:string-substitute "ä" "ae"
(ly:string-substitute "Ö" "O"
(ly:string-substitute "ö" "oe"
(ly:string-substitute "Ü" "U"
(ly:string-substitute "ü" "ue" sorttext)))))))))))))
(ly:string-substitute "." ""
(transliterate-de sorttext))))
index-item-list))
(make-music 'EventChord
'page-marker #t