From 27664acdbd595cb206655cb46ebad7b1f2687a4c Mon Sep 17 00:00:00 2001
From: brotherbus <42229878+brotherbus@users.noreply.github.com>
Date: Tue, 30 Jan 2024 15:23:20 +0000
Subject: [PATCH] added backquote because uri and range were nil when clicking
 on text button

---
 eglot.md | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/eglot.md b/eglot.md
index ffa534d..ea05d59 100644
--- a/eglot.md
+++ b/eglot.md
@@ -48,10 +48,10 @@ the children of class at point."
               (cl-destructuring-bind (&key uri range) (plist-get node :location)
                 (insert (make-string depth ?\ ) (plist-get node :name) "\n")
                 (make-text-button (+ (point-at-bol 0) depth) (point-at-eol 0)
-                                  'action (lambda (_arg)
+                                  'action `(lambda (_arg)
                                             (interactive)
-                                            (find-file (eglot--uri-to-path uri))
-                                            (goto-char (car (eglot--range-region range)))))
+                                            (find-file (eglot--uri-to-path ',uri))
+                                            (goto-char (car (eglot--range-region ',range)))))
                 (cl-loop for child across (plist-get node :children)
                          do (push (cons (1+ depth) child) tree)))))))
     (eglot--error "Hierarchy unavailable")))