From: Alexey Shchepin <alexey@process-one.net>
Date: Mon, 18 Apr 2005 20:03:07 +0000 (+0000)
Subject: * src/web/ejabberd_web_admin.erl: Added link to shared roster page
X-Git-Tag: v0.9.0~4
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=bf21482fac1d0c0ff604750e6a26db0b85d9f399;p=ejabberd

* src/web/ejabberd_web_admin.erl: Added link to shared roster page

SVN Revision: 316
---

diff --git a/ChangeLog b/ChangeLog
index cbf913647..581a16a50 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2005-04-18  Alexey Shchepin  <alexey@sevcom.net>
 
+	* src/web/ejabberd_web_admin.erl: Added link to shared roster page
+
 	* src/odbc/ejabberd_odbc.erl: ODBC connection string can be
 	specified via odbc_server option now
 	* src/ejabberd.cfg.example: Added ODBC usage example
diff --git a/src/web/ejabberd_web_admin.erl b/src/web/ejabberd_web_admin.erl
index 314b98380..90d0a9a92 100644
--- a/src/web/ejabberd_web_admin.erl
+++ b/src/web/ejabberd_web_admin.erl
@@ -107,7 +107,15 @@ make_xhtml(Els, Lang) ->
 							      ?LI([?ACT("/admin/online-users/", "Online Users")]),
 							      ?LI([?ACT("/admin/nodes/", "Nodes")]),
 							      ?LI([?ACT("/admin/stats/", "Statistics")])
-							     ])]),
+							     ] ++
+							     case lists:member(mod_shared_roster,
+									       gen_mod:loaded_modules()) of
+								 true ->
+								     [?LI([?ACT("/admin/shared-roster/", "Shared Roster")])];
+								 false ->
+								     []
+							     end
+							    )]),
 						  ?XAE("td",
 						       [{"id", "middle-td2"}],
 						       [?XAE("div", [{"id", "content"}], Els)])])])
@@ -508,7 +516,15 @@ process_admin(#request{us = US,
 		     ?LI([?ACT("online-users/", "Online Users")]),
 		     ?LI([?ACT("nodes/", "Nodes")]),
 		     ?LI([?ACT("stats/", "Statistics")])
-		    ])
+		    ] ++
+		    case lists:member(mod_shared_roster,
+				      gen_mod:loaded_modules()) of
+			true ->
+			    [?LI([?ACT("shared-roster/", "Shared Roster")])];
+			false ->
+			    []
+		    end
+		   )
 	       ], Lang);
 
 process_admin(#request{us = US,