From bf416ad52d6406d7d42efba627ec2f41b298c675 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Micka=C3=ABl=20R=C3=A9mond?=
 <mickael.remond@process-one.net>
Date: Thu, 26 Jul 2007 10:22:44 +0000
Subject: [PATCH] * src/web/ejabberd_web_admin.erl: Code clean-up.

SVN Revision: 834
---
 ChangeLog                      | 2 ++
 src/web/ejabberd_web_admin.erl | 9 ++-------
 2 files changed, 4 insertions(+), 7 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index c7758a58f..057f2f4c7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2007-07-26  Mickael Remond  <mickael.remond@process-one.net>
 
+	* src/web/ejabberd_web_admin.erl: Code clean-up.
+	
 	* src/mod_offline.erl: Code clean-up.
 
 	* src/gen_mod.erl: Throw error more cleanly.
diff --git a/src/web/ejabberd_web_admin.erl b/src/web/ejabberd_web_admin.erl
index af2c09ab8..474452038 100644
--- a/src/web/ejabberd_web_admin.erl
+++ b/src/web/ejabberd_web_admin.erl
@@ -1589,7 +1589,6 @@ user_queue(User, Server, Query, Lang) ->
 			     [us_to_list(US)]))] ++
 	case Res of
 	    ok -> [?CT("Submitted"), ?P];
-	    error -> [?CT("Bad format"), ?P];
 	    nothing -> []
 	end ++
 	[?XAE("form", [{"action", ""}, {"method", "post"}],
@@ -1953,7 +1952,7 @@ get_node(global, Node, ["db"], Query, Lang) ->
 	{badrpc, _Reason} ->
 	    [?XCT("h1", "RPC Call Error")];
 	Tables ->
-	    Res = node_db_parse_query(Node, Tables, Query),
+	    node_db_parse_query(Node, Tables, Query),
 	    STables = lists:sort(Tables),
 	    Rows = lists:map(
 		     fun(Table) ->
@@ -1990,11 +1989,7 @@ get_node(global, Node, ["db"], Query, Lang) ->
 				 ])
 		     end, STables),
 	    [?XC("h1", ?T("Database Tables at ") ++ atom_to_list(Node))] ++
-		case Res of
-		    ok -> [?CT("Submitted"), ?P];
-		    error -> [?CT("Bad format"), ?P];
-		    nothing -> []
-		end ++
+		[?CT("Submitted"), ?P] ++
 		[?XAE("form", [{"action", ""}, {"method", "post"}],
 		      [?XAE("table", [],
 			    [?XE("thead",