prevent starting on not supported versions

Author: lukaszsamson

apps/debug_adapter/lib/debug_adapter.ex

@@ -49,12 +49,30 @@ defmodule ElixirLS.DebugAdapter do
   end
 
   defp warn_if_unsupported_version do
-    with {:error, message} <- Utils.MinimumVersion.check_elixir_version() do
-      Output.debugger_important("WARNING: " <> message)
+    case Utils.MinimumVersion.check_elixir_version() do
+      {:error, message} ->
+        Output.debugger_important(message)
+        Process.sleep(5000)
+        System.halt(1)
+
+      {:warning, message} ->
+        Output.debugger_important(message)
+
+      :ok ->
+        :ok
     end
 
-    with {:error, message} <- Utils.MinimumVersion.check_otp_version() do
-      Output.debugger_important("WARNING: " <> message)
+    case Utils.MinimumVersion.check_otp_version() do
+      {:error, message} ->
+        Output.debugger_important(message)
+        Process.sleep(5000)
+        System.halt(1)
+
+      {:warning, message} ->
+        Output.debugger_important(message)
+
+      :ok ->
+        :ok
     end
   end
 end

apps/elixir_ls_utils/lib/minimum_version.ex

@@ -7,7 +7,7 @@ defmodule ElixirLS.Utils.MinimumVersion do
        "Erlang OTP releases below 22 are not supported (Currently running OTP #{otp_release})"}
     else
       if otp_release == 26 and is_windows() do
-        {:error,
+        {:warning,
          "Erlang OTP 26.0 and 26.1 have critical bugs on Windows. Please make sure OTP 26.2 or greater is installed"}
       else
         :ok
@@ -18,7 +18,7 @@ defmodule ElixirLS.Utils.MinimumVersion do
   def check_elixir_version do
     if Version.match?(System.version(), ">= 1.13.0") do
       if Regex.match?(~r/-/, System.version()) do
-        {:error,
+        {:warning,
          "Only official elixir releases are supported. (Currently running v#{System.version()})"}
       else
         :ok

apps/language_server/lib/language_server/server.ex

@@ -1730,12 +1730,30 @@ defmodule ElixirLS.LanguageServer.Server do
   end
 
   defp show_version_warnings do
-    with {:error, message} <- ElixirLS.Utils.MinimumVersion.check_elixir_version() do
-      JsonRpc.show_message(:warning, message)
+    case ElixirLS.Utils.MinimumVersion.check_elixir_version() do
+      {:error, message} ->
+        JsonRpc.show_message(:error, message)
+        Process.sleep(5000)
+        System.halt(1)
+
+      {:warning, message} ->
+        JsonRpc.show_message(:warning, message)
+
+      :ok ->
+        :ok
     end
 
-    with {:error, message} <- ElixirLS.Utils.MinimumVersion.check_otp_version() do
-      JsonRpc.show_message(:warning, message)
+    case ElixirLS.Utils.MinimumVersion.check_otp_version() do
+      {:error, message} ->
+        JsonRpc.show_message(:error, message)
+        Process.sleep(5000)
+        System.halt(1)
+
+      {:warning, message} ->
+        JsonRpc.show_message(:warning, message)
+
+      :ok ->
+        :ok
     end
 
     case Dialyzer.check_support() do