Text input dialog: Use widget-io

[pspp] / src / data / casewriter.c

diff --git a/src/data/casewriter.c b/src/data/casewriter.c
index f7760eca04a5ae5d1b78bf45c46c92676b63a0c7..7631d776d3d2ac59cf336eccde48446aa8832b80 100644 (file)
--- a/src/data/casewriter.c
+++ b/src/data/casewriter.c
@@ -99,6 +99,8 @@ casewriter_make_reader (struct casewriter *writer)
 {
   struct casereader *reader = writer->class->convert_to_reader (writer, writer->aux);
   taint_propagate (writer->taint, casereader_get_taint (reader));
+
+  caseproto_unref (writer->proto);
   taint_destroy (writer->taint);
   free (writer);
   return reader;