Fix Find All References for Active Pattern Cases by filtering to specific case

Co-authored-by: TheAngryByrd <[email protected]>

Author: Copilot

src/FsAutoComplete.Core/Commands.fs

@@ -780,10 +780,21 @@ module Commands =
         let symbolUses = tyRes.GetCheckResults.GetUsesOfSymbolInFile(symbol, ct)
 
         let symbolUses: _ seq =
-          if includeDeclarations then
-            symbolUses
-          else
-            symbolUses |> Seq.filter (fun u -> not u.IsFromDefinition)
+          let filtered =
+            if includeDeclarations then
+              symbolUses
+            else
+              symbolUses |> Seq.filter (fun u -> not u.IsFromDefinition)
+          
+          // For Active Pattern Cases, FCS returns all cases in the pattern, not just the specific one
+          // We need to filter to only the symbol that matches our query
+          match symbolUse.Symbol with
+          | :? FSharpActivePatternCase as apc ->
+            filtered |> Seq.filter (fun u -> 
+              match u.Symbol with
+              | :? FSharpActivePatternCase as foundApc -> foundApc.Name = apc.Name
+              | _ -> false)
+          | _ -> filtered
 
         let ranges = symbolUses |> Seq.map (fun u -> u.Range)
         // Note: tryAdjustRanges is designed to only be able to fail iff `errorOnFailureToFixRange` is `true`