~singpolyma/network-protocol-xmpp

b200b15a345f4489a7b99c45bd27cee015a7f941 — John Millikin 14 years ago 6f4c4a1
Derive Stanza from Show and Eq.
1 files changed, 1 insertions(+), 0 deletions(-)

M Network/Protocol/XMPP/Stanzas.hs
M Network/Protocol/XMPP/Stanzas.hs => Network/Protocol/XMPP/Stanzas.hs +1 -0
@@ 59,6 59,7 @@ data Stanza = Stanza
		,stanzaLang     :: String
		,stanzaPayloads :: [XmlTree]
	}
	deriving (Show, Eq)

stanzaTypeMap :: [((String, String, String), StanzaType)]
stanzaTypeMap = mkStanzaTypeMap $ [