add transliteration to toc
This commit is contained in:
@ -67,13 +67,14 @@
|
||||
(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 "ü" "ue" sorttext)))))))))))))
|
||||
index-item-list))
|
||||
(make-music 'EventChord
|
||||
'page-marker #t
|
||||
|
Reference in New Issue
Block a user