From 260664462d0adbbcc5eeffb8d9fac3d6393d1019 Mon Sep 17 00:00:00 2001
From: tux <tux@goldenerreiter.org>
Date: Mon, 30 Oct 2023 23:20:49 +0100
Subject: [PATCH] fix custom verse breaks for windows

---
 verses_with_chords.ly | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/verses_with_chords.ly b/verses_with_chords.ly
index 803c1ad..bed84e5 100644
--- a/verses_with_chords.ly
+++ b/verses_with_chords.ly
@@ -5,7 +5,7 @@
      #{ \markup { \column {
      $(let ((verse-markup-string (
         string-append "\\line { "
-          (ly:regex-replace (ly:make-regex "\n") text " } \\line { ")
+          (ly:regex-replace (ly:make-regex "\r?\n") text " } \\line { ")
           " \\size-box-to-box ##f ##t \"\" \"Agj\" }" )))
        (ly:parser-include-string verse-markup-string))
      }}#}
@@ -108,7 +108,7 @@
     text
     (let make-custom-linebreaks
       ((break-words custom-verse-breaks)
-       (newtext (ly:regex-replace (ly:make-regex "\n") text " ")))
+       (newtext (ly:regex-replace (ly:make-regex "\r?\n") text " ")))
       (if (null? break-words)
           newtext
           (make-custom-linebreaks