X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/5a8da83ce7dea6d6746cc02f154316710214fce0..65ce050e2794a14e17b26de8096b748d51cc1f9a:/docs/contrib/sendfrom.c

diff --git a/docs/contrib/sendfrom.c b/docs/contrib/sendfrom.c
index 451a7927..2ae8bd53 100644
--- a/docs/contrib/sendfrom.c
+++ b/docs/contrib/sendfrom.c
@@ -298,6 +298,7 @@ get_message_header_info(FILE *in, char *format) {
     dat[3] = INT_MAX;
 
     (void) fmt_compile(new_fs(NULL, NULL, format), &fmt, 1);
+    free_fs();
 
     /*
      * Read in the message and process the header.