diff options
| -rw-r--r-- | ChangeLog | 2 | ||||
| -rw-r--r-- | src/web/ejabberd_web_admin.erl | 9 |
2 files changed, 4 insertions, 7 deletions
@@ -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", |