diff --git a/engines/director/lingo/lingo-code.cpp b/engines/director/lingo/lingo-code.cpp
index 21a75097453..883b36becc5 100644
--- a/engines/director/lingo/lingo-code.cpp
+++ b/engines/director/lingo/lingo-code.cpp
@@ -944,7 +944,7 @@ Datum LC::chunkRef(ChunkType type, int startChunk, int endChunk, const Datum &sr
 	case kChunkItem:
 	case kChunkLine:
 		{
-			Common::u32char_type_t delimiter = (type == kChunkItem) ? g_lingo->_itemDelimiter : '\n';
+			Common::u32char_type_t delimiter = (type == kChunkItem) ? g_lingo->_itemDelimiter : '\r';
 
 			int idx = 0;
 			while (true) {
diff --git a/engines/director/lingo/lingo.cpp b/engines/director/lingo/lingo.cpp
index 398f805275d..9562c2f6f66 100644
--- a/engines/director/lingo/lingo.cpp
+++ b/engines/director/lingo/lingo.cpp
@@ -1201,7 +1201,7 @@ void Lingo::varAssign(const Datum &var, const Datum &value) {
 					break;
 				case kChunkLine:
 					while (numberOfChunks < var.u.cref->startChunk ) {
-						res += '\n';
+						res += '\r';
 						numberOfChunks++;
 					}
 					break;