Pipe is indented too far

[nojaf]

Issue created from fantomas-online

Code

module X =
  let getValSignature displayContext (v: FSharpMemberOrFunctionOrValue) =
    let name =
      if v.DisplayName.StartsWith "( " then
        v.LogicalName
      else
        v.DisplayName
      |> PrettyNaming.QuoteIdentifierIfNeeded
    
    ()

Result

module X =
  let getValSignature displayContext (v: FSharpMemberOrFunctionOrValue) =
    let name =
      if v.DisplayName.StartsWith "( " then
        v.LogicalName
      else
        v.DisplayName
        |> PrettyNaming.QuoteIdentifierIfNeeded

    ()

Problem description

Not sure why but the |> PrettyNaming.QuoteIdentifierIfNeeded is part of the else branch after formatting.

Extra information

• The formatted result breaks by code.
• The formatted result gives compiler warnings.
• I or my company would be willing to help fix this.

Options

Fantomas Master at 12/23/2020 11:44:01 - 01a3162

    { config with
                IndentSize = 2 }

_{Did you know that you can ignore files when formatting from fantomas-tool or the FAKE targets by using a .fantomasignore file?}

[nojaf]

The problem occurs earlier:

module X =
  let getValSignature displayContext (v: FSharpMemberOrFunctionOrValue) =
    let name =
      if v.DisplayName.StartsWith "( " 
      then v.LogicalName
      else v.DisplayName
      |> PrettyNaming.QuoteIdentifierIfNeeded
    
    ()

formatted to the source above is different AST again.