From 7857c5690213514fe422ec3f231e34285ffeb4aa Mon Sep 17 00:00:00 2001
From: Brian Nelson <brian.nelson@xsitellc.com>
Date: Sun, 29 Dec 2019 18:25:38 +0000
Subject: [PATCH] Original code was ignoring passed in newline characters

---
 Source/FountainSharp.Parse/FountainDocument.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Source/FountainSharp.Parse/FountainDocument.fs b/Source/FountainSharp.Parse/FountainDocument.fs
index 2d7c117..2814dc1 100644
--- a/Source/FountainSharp.Parse/FountainDocument.fs
+++ b/Source/FountainSharp.Parse/FountainDocument.fs
@@ -18,7 +18,7 @@ type FountainDocument(blocks : FountainBlocks, ?text : string) =
   /// inline HTML (etc.) will be stored using the specified string.
   static let parse(text : string, ctx:ParsingContext) =
     let text = properNewLines text
-    let lines = text.Split([|Environment.NewLine|], StringSplitOptions.None) |> List.ofArray
+    let lines = text.Split([|ctx.NewLine|], StringSplitOptions.None) |> List.ofArray
 
     let blocks = 
       lines