erlang plugin: Have "send_error" free the *entire* term.

diff --git a/src/erlang.c b/src/erlang.c
index 93b2441..96f77ae 100644 (file)
--- a/src/erlang.c
+++ b/src/erlang.c
@@ -127,7 +127,7 @@ static int send_error (int fd, ETERM *to, const char *message) /* {{{ */
        else
                status = 0;
 
-       erl_free_term (reply);
+       erl_free_compound (reply);
 
        return (status);
 } /* }}} int send_error */