Missing space after multiline string

[nojaf]

Issue created from fantomas-ui

The code does not compile anymore if there is only one space before the config.

Code

[<Test>]
let ``attribute on module after namespace`` () =
    formatSourceString false """namespace SomeNamespace

[<AutoOpen>]
module Types =
    let a = 5
"""  config
    |> prepend newline
    |> should equal """
namespace SomeNamespace

[<AutoOpen>]
module Types =
    let a = 5
"""

Result

[<Test>]
let ``attribute on module after namespace`` () =
    formatSourceString false """namespace SomeNamespace

[<AutoOpen>]
module Types =
    let a = 5
""" config
    |> prepend newline
    |> should equal """
namespace SomeNamespace

[<AutoOpen>]
module Types =
    let a = 5
"""

Options

Fantomas Next - 3.3.0-4/8/2020

Name	Value
IndentOnTryWith	false
IndentSpaceNum	4
KeepNewlineAfter	false
MaxIfThenElseShortWidth	40
PageWidth	120
ReorderOpenDeclaration	false
SemicolonAtEndOfLine	false
SpaceAfterComma	true
SpaceAfterSemicolon	true
SpaceAroundDelimiter	true
SpaceBeforeClassConstructor	false
SpaceBeforeColon	false
SpaceBeforeLowercaseInvocation	true
SpaceBeforeMember	false
SpaceBeforeParameter	true
SpaceBeforeSemicolon	false
SpaceBeforeUppercaseInvocation	false
StrictMode	false

[nojaf]

Feels related to #545