Conventions/Naming: minor refactoring

Changed names of some local vars and parameters in NestedFunctionNames.fs and UnestedFunctionNames.fs; Fixed indentation in FL0078.md
fsprojects · Aug 9, 2022 · 639d9cc · 639d9cc
1 parent 3c563f7
commit 639d9cc
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 5 deletions.
diff --git a/docs/content/how-tos/rules/FL0078.md b/docs/content/how-tos/rules/FL0078.md
@@ -24,7 +24,7 @@ Update the Nested function names to be consistent with the rules you have specif
 
     {
         "NestedFunctionNames": {
-        "enabled": false,
+            "enabled": false,
             "config": {
                 "naming": "CamelCase",
                 "underscores": "None"

diff --git a/src/FSharpLint.Core/Rules/Conventions/Naming/NestedFunctionNames.fs b/src/FSharpLint.Core/Rules/Conventions/Naming/NestedFunctionNames.fs
@@ -10,8 +10,8 @@ let private getIdentifiers (args: AstNodeRuleParams) =
     match args.AstNode with
     | AstNode.Binding (SynBinding (_, _, _, _, _attributes, _, _, pattern, _, _, _, _)) ->
         if isNested args args.NodeIndex then
-            let allEncompassingAccessibility = Accessibility.Public
-            getPatternIdents allEncompassingAccessibility (fun _accessibility pat -> getFunctionIdents pat) true pattern
+            let maxAccessibility = Accessibility.Public
+            getPatternIdents maxAccessibility (fun _a11y innerPattern -> getFunctionIdents innerPattern) true pattern
         else
             Array.empty
     | _ -> Array.empty

diff --git a/src/FSharpLint.Core/Rules/Conventions/Naming/UnnestedFunctionNames.fs b/src/FSharpLint.Core/Rules/Conventions/Naming/UnnestedFunctionNames.fs
@@ -12,8 +12,8 @@ let private getIdentifiers (args: AstNodeRuleParams) =
         if isNested args args.NodeIndex then
             Array.empty
         else
-            let allEncompassingAccessibility = Accessibility.Public
-            getPatternIdents allEncompassingAccessibility (fun _accessibility pat -> getFunctionIdents pat) true pattern
+            let maxAccessibility = Accessibility.Public
+            getPatternIdents maxAccessibility (fun _a11y innerPattern -> getFunctionIdents innerPattern) true pattern
     | _ -> Array.empty
 
 let rule config =