From 65a37864ffe67c65db4b4ec287f2d6ad32d6e132 Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Fri, 21 May 2021 12:29:54 +0200
Subject: [PATCH] Add hyperlinks to clients, os, languages and conntypes pages

---
 mod_statsdx/src/mod_statsdx.erl | 14 +++++++++-----
 1 file changed, 9 insertions(+), 5 deletions(-)

diff --git a/mod_statsdx/src/mod_statsdx.erl b/mod_statsdx/src/mod_statsdx.erl
index 1eaeb9c..a59b5fc 100644
--- a/mod_statsdx/src/mod_statsdx.erl
+++ b/mod_statsdx/src/mod_statsdx.erl
@@ -1575,12 +1575,16 @@ do_sessions_table(_Node, _Lang, Filter, {Sort_direction, Sort_column}, Host) ->
 		_ -> 3 + length(Filter)
 	      end,
 	      UserURL = lists:duplicate(Level, "../") ++ "server/" ++ Server ++ "/user/" ++ User ++ "/",
+	      UpStr = lists:duplicate(length(Filter), "../"),
+	      ClientIdStr = atom_to_list(Client_id),
+	      OsIdStr = atom_to_list(OS_id),
+	      ConnTypeStr = atom_to_list(ConnType),
 	      ?XE(<<"tr">>, [
-			 ?XE(<<"td">>, [?AC(list_to_binary(UserURL), jid:encode(JID))]),
-			 ?XCTB("td", atom_to_list(Client_id)),
-			 ?XCTB("td", atom_to_list(OS_id)),
-			 ?XCTB("td", LangS),
-			 ?XCTB("td", atom_to_list(ConnType)),
+			 ?XE(<<"td">>, [?AC(UserURL, jid:encode(JID))]),
+			 ?XE(<<"td">>, [?AC(UpStr++"client/"++ClientIdStr, ClientIdStr)]),
+			 ?XE(<<"td">>, [?AC(UpStr++"os/"++OsIdStr, OsIdStr)]),
+			 ?XE(<<"td">>, [?AC(UpStr++"languages/"++LangS, LangS)]),
+			 ?XE(<<"td">>, [?AC(UpStr++"conntype/"++ConnTypeStr, ConnTypeStr)]),
 			 ?XCTB("td", Client),
 			 ?XCTB("td", Version),
 			 ?XCTB("td", OS)