address review(fixup)

Author: knocte

src/FSharpLint.Core/Rules/Conventions/Naming/NamingHelper.fs

@@ -25,22 +25,7 @@ module QuickFixes =
         Some { FromText = ident.idText; FromRange = ident.idRange; ToText = toText })
 
     let removePrefixingAndSuffixingUnderscores (ident:Ident) = lazy(
-        let rec removePrefixingUnderscores (str: string) =
-            if str.StartsWith "_" then
-                removePrefixingUnderscores(str.Substring 1)
-            else
-                str
-
-        let rec removeSuffixingUnderscores (str: string) =
-            if str.EndsWith "_" then
-                removeSuffixingUnderscores(str.Substring(0, str.Length - 1))
-            else
-                str
-
-        let toText =
-            ident.idText
-            |> removePrefixingUnderscores
-            |> removeSuffixingUnderscores
+        let toText = ident.idText.Trim '_'
         Some { FromText = ident.idText; FromRange = ident.idRange; ToText = toText })
 
     let addPrefix prefix (ident:Ident) = lazy(