diff options
author | Felicián Németh <felician.nemeth@gmail.com> | 2024-08-19 10:59:03 +0200 |
---|---|---|
committer | Felicián Németh <felician.nemeth@gmail.com> | 2024-08-19 10:59:03 +0200 |
commit | ee39a0edd43431eee899fc7787d936731c157689 (patch) | |
tree | f54c596c497ecedf73fe342e25bc584787c9e44c | |
parent | 135e51c7770434b7039721d28a3619166c5841d9 (diff) |
* eglot-x.el (eglot-x-find-typed-holes): Fix typo in a comment, change
name of a local variable.
-rw-r--r-- | eglot-x.el | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -2429,18 +2429,18 @@ See URL `https://github.com/ocaml/ocaml-lsp/blob/master/ocaml-lsp-server/docs/oc res)) (xref-show-xrefs-function xref-show-definitions-function) prev-xref prev-line) - ;; Ajust summaries when multiple xref items are on the same line. + ;; Adjust summaries when multiple xref items are on the same line. ;; Assume the server sends the ranges sorted. (dolist (xref xrefs) (let* ((loc (xref-item-location xref)) (curr-line (xref-location-line loc)) - (curr-postfix (substring (xref-item-summary xref) + (curr-suffix (substring (xref-item-summary xref) (xref-file-location-column loc)))) (when (eq prev-line curr-line) - (oset xref summary curr-postfix) + (oset xref summary curr-suffix) (oset prev-xref summary (substring (xref-item-summary prev-xref) 0 - (* -1 (length curr-postfix))))) + (* -1 (length curr-suffix))))) (setq prev-xref xref prev-line curr-line))) (if xrefs |