Next attempt to fix emacs

This commit is contained in:
XeroOl 2024-04-30 16:56:41 -05:00
parent 1135eee7ed
commit ac406e38d0
2 changed files with 2 additions and 5 deletions

View File

@ -104,11 +104,9 @@ fntype is one of fn or λ or lambda"
(doto (doto
(case (analyze-fn result.definition) (case (analyze-fn result.definition)
{:fntype _} {: label {:fntype _} {: label
:kind (if (label:find ":") kinds.Method kinds.Function) :kind (if (label:find ":") kinds.Method kinds.Function)}
:textEdit {:newText label}}
_ {: label _ {: label
:kind kinds.Variable :kind kinds.Variable})
:textEdit {:newText label}})
(tset :documentation (hover-format result)))) (tset :documentation (hover-format result))))
{: hover-format {: hover-format

View File

@ -205,7 +205,6 @@ Every time the client sends a message, it gets handled by a function in the corr
(each [_ completion (ipairs ?completions)] (each [_ completion (ipairs ?completions)]
(set completion.filterText (.. prefix completion.label)) (set completion.filterText (.. prefix completion.label))
(set completion.insertText (.. prefix completion.label)))) (set completion.insertText (.. prefix completion.label))))
;; (set completion.textEdit {:newText completion.label :range input-range})))
(each [_ completion (ipairs ?completions)] (each [_ completion (ipairs ?completions)]
(set completion.textEdit {:newText completion.label :range input-range})))) (set completion.textEdit {:newText completion.label :range input-range}))))
?completions)))) ?completions))))