Fix memory leak in examine

[pspp] / src / language / stats / examine.q

diff --git a/src/language/stats/examine.q b/src/language/stats/examine.q
index d06f98ef9d79692cc6ad98cd1372dcfa79d571b4..d4ac27dde74044a92f48d3748df8e3e1ce0dd4ca 100644 (file)
--- a/src/language/stats/examine.q
+++ b/src/language/stats/examine.q
@@ -348,7 +348,7 @@ show_npplot (const struct variable **dependent_var,
           np = result->metrics[v].np;
           reader = casewriter_make_reader (np->writer);
           npp = np_plot_create (np, reader, ds_cstr (&label));
-          dnpp = np_plot_create (np, reader, ds_cstr (&label));
+          dnpp = dnp_plot_create (np, reader, ds_cstr (&label));
 
          ds_destroy (&label);
 
@@ -365,6 +365,7 @@ show_npplot (const struct variable **dependent_var,
             }
 
          statistic_destroy (&np->parent.parent);
+         casereader_destroy (reader);
        }
     }
 }