typo fixed

src/FSharpVSPowerTools.Logic/RenameSuggestions.fs

@@ -145,7 +145,7 @@ let private getSubParts (name:string) parts =
     |> List.map String.Concat 
     |> List.filter (fun s -> name.Contains(s))
 
-let fastSuggesttions (kind:Kind) (name:string) =
+let fastSuggestions (kind:Kind) (name:string) =
     let parts = splitInParts name
     match kind with
     | Variable -> highPrio name :: suggestIndexNames name
@@ -167,7 +167,7 @@ let suggest (kind:Kind) (name:string) =
     use hunspell = createHunspell()
     let parts = splitInParts name
 
-    fastSuggesttions kind name
+    fastSuggestions kind name
     |> List.append (suggestSynonyms hunspell parts)
     |> List.append (suggestCorrections hunspell [name]) 
     |> List.append (suggestCorrections hunspell parts)