aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii2023-04-05 12:23:54 +0300
committerEli Zaretskii2023-04-05 12:23:54 +0300
commit81d1f46d0fe0e4d8656e4994fd77b60b197f2bcf (patch)
tree642d064012fd5ec6d97fdbe410d6d2bccd6ae42d
parent38cdfcb2128d5a7b2eb174faca0ef1e32f641e85 (diff)
downloademacs-81d1f46d0fe0e4d8656e4994fd77b60b197f2bcf.tar.gz
emacs-81d1f46d0fe0e4d8656e4994fd77b60b197f2bcf.zip
; Avoid compiler warning in eglot.el.
-rw-r--r--lisp/progmodes/eglot.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index 4a9209ab9b4..cb9190a7523 100644
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -1605,6 +1605,7 @@ If optional MARKER, return a marker instead"
1605 (directory-file-name (file-local-name truepath)) 1605 (directory-file-name (file-local-name truepath))
1606 eglot--uri-path-allowed-chars))))) 1606 eglot--uri-path-allowed-chars)))))
1607 1607
1608(declare-function w32-long-file-name "w32proc.c" (fn))
1608(defun eglot--uri-to-path (uri) 1609(defun eglot--uri-to-path (uri)
1609 "Convert URI to file path, helped by `eglot--current-server'." 1610 "Convert URI to file path, helped by `eglot--current-server'."
1610 (when (keywordp uri) (setq uri (substring (symbol-name uri) 1))) 1611 (when (keywordp uri) (setq uri (substring (symbol-name uri) 1)))