Generate language server enum settings as const string choices (#4517)

emacs-lsp · Oct 14, 2024 · 900a041 · 900a041
1 parent 1bec655
commit 900a041
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/scripts/lsp-generate-settings.el b/scripts/lsp-generate-settings.el
@@ -37,7 +37,8 @@
 ENUM is the value of enum key in vscode manifest."
   (cond
    ((and enum (not (or (equal "boolean" type)
-                       (equal '("boolean") type)))) `(choice (:tag ,@(append enum nil))))
+                       (equal '("boolean") type))))
+    `(choice ,@(mapcar (lambda (e) `(const ,(format "\"%s\"" e))) enum)))
    (t (pcase type
         ("boolean" 'boolean)
         ('("boolean") 'boolean)