Fix test "should provide pattern match completions"

Author: neuroevolutus

server/src/server.test.ts

@@ -13,6 +13,7 @@ import {
 } from "./server";
 import {
   CompletionItem,
+  CompletionItemKind,
   Hover,
   MarkupContent,
   Range,
@@ -199,7 +200,7 @@ result
       const completions = getCompletionItems(document, position);
 
       const patternCompletions = completions.filter(
-        (c) => c.kind === 14 && c.label.includes("->"), // Snippet kind
+        (c) => c.kind === CompletionItemKind.Snippet && c.insertText?.includes("->"), // Snippet kind
       );
       expect(patternCompletions.length).toBeGreaterThan(0);
     });

server/src/server.ts

@@ -683,19 +683,19 @@ function analyzeCompletionContext(
     return { type: "tag" };
   }
 
-  // Check for where clause context
-  if (lineText.trim().startsWith(";") || findParentOfType(node, "where")) {
-    return { type: "where_clause" };
-  }
-
   // Check for pattern match context
   if (
     lineText.trim().startsWith("|") ||
-    findParentOfType(node, "pattern_match")
+    findParentOfType(node, "match_fun")
   ) {
     return { type: "pattern_match" };
   }
 
+  // Check for where clause context
+  if (lineText.trim().startsWith(";") || findParentOfType(node, "where")) {
+    return { type: "where_clause" };
+  }
+
   // Check for record field access
   if (lineText.includes(".") || parent?.type === "record_access") {
     return { type: "record_field" };