X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/17932f7aea1c21cf17738f47996345d9d0a6ce51..3dc0fe0bcb41205700cf9229cb6d7bbfd95a3c2a:/sbr/seq_save.c

diff --git a/sbr/seq_save.c b/sbr/seq_save.c
index 3c53e4bc..a431804e 100644
--- a/sbr/seq_save.c
+++ b/sbr/seq_save.c
@@ -31,8 +31,12 @@ seq_save (struct msgs *mp)
 
     /* check if sequence information has changed */
     if (!(mp->msgflags & SEQMOD)) {
-    	if (mp->seqhandle)
+    	if (mp->seqhandle) {
 	    lkfclosedata (mp->seqhandle, mp->seqname);
+	    mp->seqhandle = NULL;
+	    free(mp->seqname);
+	    mp->seqname = NULL;
+	}
 	return;
     }
     mp->msgflags &= ~SEQMOD;