From 2bd24c4eca7891dded69567658a4b7b48302980f Mon Sep 17 00:00:00 2001
From: Philipp Balzarek <p.balzarek@googlemail.com>
Date: Fri, 11 Dec 2015 22:18:37 +0100
Subject: [PATCH] allow "/" and "@" characters in resource part

Fixes #98
---
 source/Network/Xmpp/Types.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/source/Network/Xmpp/Types.hs b/source/Network/Xmpp/Types.hs
index f1361ae..5b27fca 100644
--- a/source/Network/Xmpp/Types.hs
+++ b/source/Network/Xmpp/Types.hs
@@ -1173,7 +1173,7 @@ jidParts = do
         return bytes
     resourcePart = do
         _ <- AP.char '/'
-        AP.takeWhile1 (AP.notInClass ['@', '/'])
+        AP.takeText