diff options
author | Badlop <badlop@process-one.net> | 2009-05-06 16:54:43 +0000 |
---|---|---|
committer | Badlop <badlop@process-one.net> | 2009-05-06 16:54:43 +0000 |
commit | fec3742aaacbfac48266afe72e64a3a9f5562d02 (patch) | |
tree | 54b3ef002b086b2e05231f60c12ecced9a1d9ae8 /src/odbc/odbc_queries.erl | |
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/odbc_queries.erl')
-rw-r--r-- | src/odbc/odbc_queries.erl | 2 |
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}) -> |