diff --git a/src/Fantomas.Tests/DataStructureTests.fs b/src/Fantomas.Tests/DataStructureTests.fs
index 757ccef5d1..97972202da 100644
--- a/src/Fantomas.Tests/DataStructureTests.fs
+++ b/src/Fantomas.Tests/DataStructureTests.fs
@@ -188,4 +188,14 @@ let ``multiline list should print each item on newline`` () =
       "ddddddddddddddddddddddddddddddddddddddddd"
       "zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz"
       "ffffffffffffffffffffffffffffffffffffffff" ]
+"""
+
+[<Test>]
+let ``multiline list of string should not add ;`` () =
+    formatSourceString false """
+       [ "_Binaries/AltCover/Debug+AnyCPU/AltCover.exe"
+         "_Binaries/AltCover.Shadow/Debug+AnyCPU/AltCover.Shadow.dll" ]
+"""  ({ config with PageWidth = 80 })
+    |> should equal """[ "_Binaries/AltCover/Debug+AnyCPU/AltCover.exe"
+  "_Binaries/AltCover.Shadow/Debug+AnyCPU/AltCover.Shadow.dll" ]
 """
\ No newline at end of file
diff --git a/src/Fantomas/CodePrinter.fs b/src/Fantomas/CodePrinter.fs
index 5f101518d4..218115f32a 100644
--- a/src/Fantomas/CodePrinter.fs
+++ b/src/Fantomas/CodePrinter.fs
@@ -690,7 +690,7 @@ and genExpr astContext synExpr =
         let isMultiline (ctx:Context) =
             xs
             |> List.fold (fun (isMultiline, f) e ->
-                if isMultiline || futureNlnCheck f ctx then
+                if isMultiline || futureNlnCheck (f +> genExpr astContext e) ctx then
                     true, sepNone
                 else
                     false, f +> genExpr astContext e