Newline added before let binding with attribute in class

[ErikSchierboom]

Issue created from fantomas-ui

If you define a let binding in a class definition that has an attribute applied to it, an extra newline is introduced:

Code

module Tests

open Xunit

type AppointmentTests() =

    [<Fact>]
    member __.``Test one``() =
        1 |> should equal 1

    [<Fact>]
    let ``Test two``() =
        2 |> should equal 2
    
    let ``Test three``() =
        3 |> should equal 3

    [<Fact>]
    member __.``Test four``() =
        4 |> should equal 4

    [<Fact>]
    let ``Test five``() =
        5 |> should equal 5

Result

module Tests

open Xunit

type AppointmentTests() =

    [<Fact>]
    member __.``Test one``() = 1 |> should equal 1


    [<Fact>]
    let ``Test two``() = 2 |> should equal 2

    let ``Test three``() = 3 |> should equal 3

    [<Fact>]
    member __.``Test four``() = 4 |> should equal 4


    [<Fact>]
    let ``Test five``() = 5 |> should equal 5

Options

Fantomas 3.2.0

Name	Value
IndentOnTryWith	false
IndentSpaceNum	4
KeepNewlineAfter	false
MaxIfThenElseShortWidth	40
PageWidth	120
ReorderOpenDeclaration	false
SemicolonAtEndOfLine	false
SpaceAfterComma	true
SpaceAfterSemicolon	true
SpaceAroundDelimiter	true
SpaceBeforeArgument	true
SpaceBeforeColon	false
StrictMode	false

[ErikSchierboom]

This is fixed in Fantomas 4 preview. See this example.