From bd1df027c622e1f96f9eeaac612a6a956c1ff0b6 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 7831a9063..f933fac39 100644
--- a/src/expat_erl.c
+++ b/src/expat_erl.c
@@ -179,6 +179,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;
 }