Another resource leak from Maxime Villard

diff --git a/drill/work.c b/drill/work.c
index 653145fe522bbb891818f925d837599dad1b52a6..370d48b01b3e134cac61beb450c21dd3a330fbc7 100644 (file)
--- a/drill/work.c
+++ b/drill/work.c
@@ -235,6 +235,7 @@ dump_hex(const ldns_pkt *pkt, const char *filename)
        if (status != LDNS_STATUS_OK) {
                error("Unable to convert packet: error code %u", status);
                LDNS_FREE(wire);
+               fclose(fp);
                return;
        }