X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/6c42153ad9362cc676ea66563bf400d7511b3b68..4dff00a2d1a9e0b1e301c3015d8f7bdf87e2e37a:/sbr/folder_free.c?ds=sidebyside

diff --git a/sbr/folder_free.c b/sbr/folder_free.c
index f06bbf5c..7f87ccd4 100644
--- a/sbr/folder_free.c
+++ b/sbr/folder_free.c
@@ -2,8 +2,6 @@
 /*
  * folder_free.c -- free a folder/message structure
  *
- * $Id$
- *
  * This code is Copyright (c) 2002, by the authors of nmh.  See the
  * COPYRIGHT file in the root directory of the nmh distribution for
  * complete copyright information.
@@ -27,6 +25,14 @@ folder_free (struct msgs *mp)
     for (i = 0; mp->msgattrs[i]; i++)
 	free (mp->msgattrs[i]);
 
+    /* Close/free the sequence file if it is open */
+
+    if (mp->seqhandle)
+    	lkfclosedata (mp->seqhandle, mp->seqname);
+
+    if (mp->seqname)
+    	free (mp->seqname);
+
     free (mp->msgstats);	/* free message status area   */
     free (mp);			/* free main folder structure */
 }