Fix multiread option

diff --git a/scm/lily.scm b/scm/lily.scm
index b8b0216467e835926d216eaf4531bb92a21f6fde..b1de941c47d1a5f4beac50710eeb476ff6c889b9 100644 (file)
--- a/scm/lily.scm
+++ b/scm/lily.scm
@@ -810,7 +810,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)))