Fix issue #1147

manateelazycat · Jan 11, 2025 · 6fd5eb2 · 6fd5eb2
1 parent 890f3de
commit 6fd5eb2
Showing 1 changed file with 8 additions and 7 deletions.
diff --git a/lsp-bridge.el b/lsp-bridge.el
@@ -1085,14 +1085,15 @@ So we build this macro to restore postion after code format."
 
 (defun lsp-bridge-get-lang-server-by-extension (filename extension-list)
   "Get lang server for file extension."
-  (when-let* ((file-extension (substring filename (+ (cl-position ?. filename) 1) (length filename)))
+  (when-let* ((dot-pos (cl-position ?. filename))
+              (file-extension (substring filename (1+ dot-pos) (length filename)))
               (langserver-info (cl-find-if
-                                (lambda (pair)
-                                  (let ((extension (car pair)))
-                                    (if (eq (type-of extension) 'string)
-                                        (string-equal file-extension extension)
-                                      (member file-extension extension))))
-                                extension-list)))
+                               (lambda (pair)
+                                 (let ((extension (car pair)))
+                                   (if (eq (type-of extension) 'string)
+                                       (string-equal file-extension extension)
+                                     (member file-extension extension))))
+                               extension-list)))
     (cdr langserver-info)))
 
 (defun lsp-bridge-get-multi-lang-server-by-extension (filename)