Fix server keepAlive + status bar update

Author: ericdallo

gradle.properties

@@ -19,7 +19,7 @@ platformVersion = 2023.3
 
 # Plugin Dependencies -> https://plugins.jetbrains.com/docs/intellij/plugin-dependencies.html
 # Example: platformPlugins = com.intellij.java, com.jetbrains.php:203.4449.22
-platformPlugins = com.intellij.java, com.redhat.devtools.lsp4ij:0.10.0-20250204-093530@nightly
+platformPlugins = com.intellij.java, com.redhat.devtools.lsp4ij:0.10.0-20250207-140319@nightly
 
 # Gradle Releases -> https://github.com/gradle/gradle/releases
 gradleVersion = 8.5

src/main/clojure/com/github/clojure_lsp/intellij/extension/init_db_startup.clj

@@ -4,24 +4,11 @@
    :implements [com.intellij.openapi.startup.StartupActivity
                 com.intellij.openapi.project.DumbAware])
   (:require
-   [com.github.clojure-lsp.intellij.db :as db]
-   [com.rpl.proxy-plus :refer [proxy+]])
+   [com.github.clojure-lsp.intellij.db :as db])
   (:import
-   [com.intellij.openapi.project Project]
-   [com.redhat.devtools.lsp4ij LanguageServerWrapper]
-   [com.redhat.devtools.lsp4ij.lifecycle LanguageServerLifecycleListener LanguageServerLifecycleManager]))
+   [com.intellij.openapi.project Project]))
 
 (set! *warn-on-reflection* true)
 
 (defn -runActivity [_this ^Project project]
-  (db/init-db-for-project project)
-  (.addLanguageServerLifecycleListener
-   (LanguageServerLifecycleManager/getInstance project)
-   (proxy+ [] LanguageServerLifecycleListener
-     (handleStatusChanged [_ ^LanguageServerWrapper server-wrapper]
-       (let [status (keyword (.toString (.getServerStatus server-wrapper)))]
-         (db/assoc-in project [:status] status)
-         (run! #(% status) (db/get-in project [:on-status-changed-fns]))))
-     (handleLSPMessage [_ _ _ _])
-     (handleError [_ _ _])
-     (dispose [_]))))
+  (db/init-db-for-project project))

src/main/clojure/com/github/clojure_lsp/intellij/extension/language_server_factory.clj

@@ -7,6 +7,7 @@
    [clojure.string :as string]
    [com.github.clojure-lsp.intellij.client :as lsp-client]
    [com.github.clojure-lsp.intellij.config :as config]
+   [com.github.clojure-lsp.intellij.db :as db]
    [com.github.clojure-lsp.intellij.editor :as editor]
    [com.github.clojure-lsp.intellij.server :as server]
    [com.github.clojure-lsp.intellij.settings :as settings]
@@ -16,7 +17,7 @@
    [com.intellij.openapi.progress ProgressIndicator]
    [com.intellij.openapi.project Project]
    [com.intellij.openapi.vfs LocalFileSystem VirtualFile]
-   [com.redhat.devtools.lsp4ij LSPIJUtils]
+   [com.redhat.devtools.lsp4ij LSPIJUtils ServerStatus]
    [com.redhat.devtools.lsp4ij.client LanguageClientImpl]
    [com.redhat.devtools.lsp4ij.client.features LSPClientFeatures LSPProgressFeature]
    [com.redhat.devtools.lsp4ij.server OSProcessStreamConnectionProvider]
@@ -111,7 +112,12 @@
        (.setInitializationOptions params {"dependency-scheme" "jar"
                                           "hover" {"arity-on-same-line?" true}}))
      (findFileByUri ^VirtualFile [_ ^String uri]
-       (find-file-by-uri uri)))
+       (find-file-by-uri uri))
+     (keepServerAlive [_] true)
+     (handleServerStatusChanged [^LSPClientFeatures this ^ServerStatus server-status]
+       (let [status (keyword (.toString server-status))]
+         (db/assoc-in (.getProject this) [:status] status)
+         (run! #(% status) (db/get-in (.getProject this) [:on-status-changed-fns])))))
     (.setProgressFeature (proxy+ [] LSPProgressFeature
                            (updateMessage [_ ^String message ^ProgressIndicator indicator]
                              (.setText indicator (str "LSP: " message)))))))