From 733e84a4a86c9b730dc0f253fe7d9388976f38f7 Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Tue, 24 Nov 2009 11:56:26 +0000
Subject: [PATCH] Fix exmpp_stanza:get_sender return value.

SVN Revision: 2757
---
 src/ejabberd_c2s.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ejabberd_c2s.erl b/src/ejabberd_c2s.erl
index 5a9f6fddc..f1d8b3287 100644
--- a/src/ejabberd_c2s.erl
+++ b/src/ejabberd_c2s.erl
@@ -2032,7 +2032,7 @@ check_from(El, FromJID) ->
     case exmpp_stanza:get_sender(El) of
 	undefined ->
 	    El;
-	{value, SJID} ->
+	SJID when is_binary(SJID) ->
 	    try
 		JIDEl = exmpp_jid:parse(SJID),
 		case exmpp_jid:prep_resource(JIDEl) of