fix custom line break issue with comma

This commit is contained in:
Christoph Wagner 2023-11-23 10:24:06 +01:00
parent b23ba5c0dc
commit 2f906344de

View File

@ -114,7 +114,7 @@
(make-custom-linebreaks (make-custom-linebreaks
(cdr break-words) (cdr break-words)
(ly:regex-replace (ly:regex-replace
(ly:make-regex (string-append "(" (ly:regex-replace (ly:make-regex "(.)") (car break-words) "(?:\\(?" 1 "| *,[^,)]+\\)" 1 ")") "(?: *,[^,)]+\\))?)(.*)$")) (ly:make-regex (string-append "(" (ly:regex-replace (ly:make-regex "(.)") (car break-words) "(?: *,[^,)]+\\)" 1 "|\\(?" 1 ")") "(?: *,[^,)]+\\))?)(.*)$"))
newtext newtext
1 "\n" 2)))))) 1 "\n" 2))))))