Process first ident in longIdent correctly. (#2960)

fsprojects · Sep 18, 2023 · db9e6e4 · db9e6e4
1 parent c3b899d
commit db9e6e4
Show file tree

Hide file tree

Showing 3 changed files with 24 additions and 2 deletions.
diff --git a/CHANGELOG.md b/CHANGELOG.md
@@ -1,9 +1,10 @@
 # Changelog
 
-## [Unreleased]
+## 6.2.1 - 2023-09-18
 
 ### Fixed
 * Backticks in optional parameter gets removed [#2954](https://github.com/fsprojects/fantomas/issues/2954)
+* Ticks in namespace are lost [#2959](https://github.com/fsprojects/fantomas/issues/2959)
 
 ## 6.2.0 - 2023-08-29
 

diff --git a/src/Fantomas.Core.Tests/ModuleTests.fs b/src/Fantomas.Core.Tests/ModuleTests.fs
@@ -1106,3 +1106,24 @@ module Bar =
         | Why
         | Zed
 """
+
+[<Test>]
+let ``namespace with ticks, 2959`` () =
+    formatSourceString
+        false
+        """
+namespace ``G-Research``.``FSharp X``.``Analyzers Y``
+
+module StringAnalyzers =
+    ()
+"""
+        config
+    |> prepend newline
+    |> should
+        equal
+        """
+namespace ``G-Research``.``FSharp X``.``Analyzers Y``
+
+module StringAnalyzers =
+    ()
+"""
diff --git a/src/Fantomas.Core/ASTTransformer.fs b/src/Fantomas.Core/ASTTransformer.fs
@@ -69,7 +69,7 @@ let mkLongIdent (longIdent: LongIdent) : IdentListNode =
         let range =
             longIdent |> List.map (fun ident -> ident.idRange) |> List.reduce unionRanges
 
-        IdentListNode(IdentifierOrDot.Ident(stn head.idText head.idRange) :: rest, range)
+        IdentListNode(IdentifierOrDot.Ident(mkIdent head) :: rest, range)
 
 let mkSynAccess (vis: SynAccess option) =
     match vis with