aboutsummaryrefslogtreecommitdiff
path: root/src/odbc
diff options
context:
space:
mode:
authorBadlop <badlop@process-one.net>2009-05-06 16:54:43 +0000
committerBadlop <badlop@process-one.net>2009-05-06 16:54:43 +0000
commitfec3742aaacbfac48266afe72e64a3a9f5562d02 (patch)
tree54b3ef002b086b2e05231f60c12ecced9a1d9ae8 /src/odbc
parent* src/Makefile.in: Prevent Erlang R13B compilation warning: (diff)
Replace TYPE/1 with is_TYPE/1 (EJAB-922)
SVN Revision: 2057
Diffstat (limited to 'src/odbc')
-rw-r--r--src/odbc/odbc_queries.erl2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/odbc/odbc_queries.erl b/src/odbc/odbc_queries.erl
index b878184a8..ef1f59218 100644
--- a/src/odbc/odbc_queries.erl
+++ b/src/odbc/odbc_queries.erl
@@ -652,7 +652,7 @@ get_and_del_spool_msg_t(LServer, Username) ->
[Result] = case ejabberd_odbc:sql_query(
LServer,
["EXECUTE dbo.get_and_del_spool_msg '", Username, "'"]) of
- Rs when list(Rs) ->
+ Rs when is_list(Rs) ->
lists:filter(fun({selected, _Header, _Row}) ->
true;
({updated, _N}) ->