From: Phil Holmes <mail@philholmes.net>
Date: Wed, 22 Aug 2012 16:54:01 +0000 (+0100)
Subject: Fix multiread option
X-Git-Tag: release/2.17.6-1~46^2~3^2~9
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=50eacf2de709d203b215eaa3318a1201aab7b650;p=lilypond.git

Fix multiread option
---

diff --git a/scm/lily.scm b/scm/lily.scm
index 6e3e8fc5ed..b0b8173161 100644
--- a/scm/lily.scm
+++ b/scm/lily.scm
@@ -732,7 +732,7 @@ PIDs or the number of the process."
                       (> (string-length s) 0))
                     (apply append
                            (map (lambda (f)
-                                  (string-split (ly:gulp-file f) #\nl))
+                                  (string-split (string-delete (ly:gulp-file f) #\cr) #\nl))
                                 files)))))
   (if (and (number? (ly:get-option 'job-count))
            (>= (length files) (ly:get-option 'job-count)))