[Nano-devel] Memory leak

[Itay Perl]

Hello,

Playing around with valgrind (http://www.valgrind.org) I found a memory leak in nano 2.0.1. The memory allocated and returned by get_input() in file winio.c line 275 is never freed.
I think this patch should do:

--- ../src/winio.c.orig 2006-12-02 14:54:24.000000000 +0200
+++ ../src/winio.c      2006-12-02 14:54:32.000000000 +0200
@@ -662,6 +662,8 @@
     fprintf(stderr, "parse_kbinput(): kbinput = %d, meta_key = %s, func_key = %s, escapes = %d, byte_digits = %d, retval = %d\n", *kbinput, *meta_key ? "TRUE" : "FALSE", *func_key ? "TRUE" : "FALSE", escapes, byte_digits, retval);
 #endif

+    /* Free memory */
+    free(kbinput);
     /* Return the result. */
     return retval;
 }

Regards,

Itay