From 3669ac8aedfb5484d27c85e8df8af60541bc2849 Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Thu, 3 Oct 2024 12:58:18 +0200
Subject: [PATCH] ejabberd_app: At server start, log Erlang and Elixir versions

---
 src/ejabberd_app.erl | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/src/ejabberd_app.erl b/src/ejabberd_app.erl
index a0065a8fa..fc9830fe9 100644
--- a/src/ejabberd_app.erl
+++ b/src/ejabberd_app.erl
@@ -64,6 +64,9 @@ start(normal, _Args) ->
 			?INFO_MSG("ejabberd ~ts is started in the node ~p in ~.2fs",
 				  [ejabberd_option:version(),
 				   node(), (T2-T1)/1000]),
+			maybe_print_elixir_version(),
+			?INFO_MSG("~ts",
+				  [erlang:system_info(system_version)]),
 			{ok, SupPid};
 		    Err ->
 			?CRITICAL_MSG("Failed to start ejabberd application: ~p", [Err]),
@@ -205,9 +208,13 @@ maybe_start_exsync() ->
         "true" -> rpc:call(node(), 'Elixir.ExSync.Application', start, []);
         _ -> ok
     end.
+
+maybe_print_elixir_version() ->
+    ?INFO_MSG("Elixir ~ts", [maps:get(build, 'Elixir.System':build_info())]).
 -else.
 setup_if_elixir_conf_used() -> ok.
 register_elixir_config_hooks() -> ok.
 start_elixir_application() -> ok.
 maybe_start_exsync() -> ok.
+maybe_print_elixir_version() -> ok.
 -endif.