From 133b8d42a34ba70a35a10d63e4b354df9ca0219c Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Tue, 24 May 2011 13:12:13 +0200
Subject: [PATCH] Disable all entity expansions (thanks to Alexey
 Shchepin)(EJAB-1451)

---
 src/expat_erl.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/expat_erl.c b/src/expat_erl.c
index e38420f5f..d32189813 100644
--- a/src/expat_erl.c
+++ b/src/expat_erl.c
@@ -169,6 +169,8 @@ static ErlDrvData expat_erl_start(ErlDrvPort port, char *buff)
       d->parser, (XML_StartNamespaceDeclHandler) erlXML_StartNamespaceDeclHandler);
    XML_SetReturnNSTriplet(d->parser, 1);
 
+   XML_SetDefaultHandler(d->parser, NULL);
+
    return (ErlDrvData)d;
 }