From 606e1982a99274dea0b5d0b44885f5b12e766f3d Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Tue, 16 Jun 2009 17:48:04 +0000
Subject: [PATCH] Replace TYPE/1 with is_TYPE/1 (EJAB-922)

SVN Revision: 2253
---
 src/web/ejabberd_http_bind.erl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/web/ejabberd_http_bind.erl b/src/web/ejabberd_http_bind.erl
index b067665dd..df2ba5c41 100644
--- a/src/web/ejabberd_http_bind.erl
+++ b/src/web/ejabberd_http_bind.erl
@@ -4,7 +4,7 @@
 %%% Purpose : Implements XMPP over BOSH (XEP-0205) (formerly known as 
 %%%           HTTP Binding)
 %%% Created : 21 Sep 2005 by Stefan Strigler <steve@zeank.in-berlin.de>
-%%% Id      : $Id: ejabberd_http_bind.erl 950 2009-05-04 01:23:55Z mremond $
+%%% Id      : $Id: ejabberd_http_bind.erl 952 2009-05-06 17:29:39Z badlop $
 %%%----------------------------------------------------------------------
 
 -module(ejabberd_http_bind).
@@ -1070,7 +1070,7 @@ cancel_timer(Timer) ->
 	    ok
     end.
 
-hex(Bin) when binary(Bin) -> hex(binary_to_list(Bin));
+hex(Bin) when is_binary(Bin) -> hex(binary_to_list(Bin));
 hex([]) -> "";
 hex([H|T]) -> 
 	[A,B] = if