From d10d7aa8ccd0ab4294b383cffed36e5825f5e84c Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Wed, 22 Oct 2025 17:11:55 +0200
Subject: [PATCH] WebAdmin: Respect newline and whitespace characters in
 results

---
 src/ejabberd_web_admin.erl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/ejabberd_web_admin.erl b/src/ejabberd_web_admin.erl
index ea63d817a..f9fb3ffb3 100644
--- a/src/ejabberd_web_admin.erl
+++ b/src/ejabberd_web_admin.erl
@@ -2197,7 +2197,10 @@ make_command_result_element(_ArgumentsUsed,
                    || {ElementName, _ElementFormat} <- TupleElements])]),
          ?XE(<<"tbody">>,
              [?XE(<<"tr">>,
-                  [?XC(<<"td">>, format_result(V, {ElementName, ElementFormat}))
+                  [?XE(<<"td">>,
+                       [?XAC(<<"span">>,
+                             [{<<"style">>, <<"white-space: pre-wrap;">>}],
+                             format_result(V, {ElementName, ElementFormat}))])
                    || {V, {ElementName, ElementFormat}}
                           <- lists:zip(tuple_to_list(Values), TupleElements)])])]);
 make_command_result_element(ArgumentsUsed,