lsp-package-version: fallback to hardcode when fail

emacs-lsp · Dec 27, 2024 · d9b4f49 · d9b4f49
1 parent 9de4050
commit d9b4f49
Showing 1 changed file with 6 additions and 4 deletions.
diff --git a/lsp-mode.el b/lsp-mode.el
@@ -9606,10 +9606,12 @@ This avoids overloading the server with many files when starting Emacs."
 (declare-function package--alist "ext:package")
 
 (defun lsp-package-version ()
-  "Returns a string with the version of the lsp-mode package"
-  (package-version-join
-   (package-desc-version
-    (car (alist-get 'lsp-mode (package--alist))))))
+  "Returns a string with the version of the lsp-mode package."
+  (condition-case nil
+      (package-version-join
+       (package-desc-version
+        (car (alist-get 'lsp-mode (package--alist)))))
+    (error "9.0.1")))
 
 (defun lsp-version ()
   "Return string describing current version of `lsp-mode'."