Add scratch file handles.

[pspp-builds.git] / src / regression.q

diff --git a/src/regression.q b/src/regression.q
index 68469e4428e72ecaa85e9c127a661165bd759773..23ba49a6e3e160036683d8038eb3cbb060b9f665 100644 (file)
--- a/src/regression.q
+++ b/src/regression.q
@@ -611,7 +611,7 @@ subcommand_export (int export, pspp_linreg_cache * c)
       assert (c != NULL);
       assert (model_file != NULL);
       assert (fp != NULL);
-      fp = fopen (handle_get_filename (model_file), "w");
+      fp = fopen (fh_get_filename (model_file), "w");
       fprintf (fp, "%s", reg_preamble);
       reg_print_getvar (fp, c);
       reg_print_categorical_encoding (fp, c);
@@ -687,7 +687,7 @@ regression_custom_export (struct cmd_regression *cmd)
     model_file = NULL;
   else
     {
-      model_file = fh_parse ();
+      model_file = fh_parse (FH_REF_FILE);
       if (model_file == NULL)
        return 0;
     }