X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fregression.q;h=737a25fdce4b4b2f03008ca8279d9b9b70a6ba73;hb=3f2ed1c5fe6dc692ca00bb18a15e41617fa2d37d;hp=d5536e80b58ce78d650f48ee0598a007fae0f498;hpb=a7a18bd636d11d167c1ebe54c9893a0c23d44bc9;p=pspp-builds.git

diff --git a/src/language/stats/regression.q b/src/language/stats/regression.q
index d5536e80..737a25fd 100644
--- a/src/language/stats/regression.q
+++ b/src/language/stats/regression.q
@@ -671,7 +671,7 @@ subcommand_export (int export, pspp_linreg_cache * c)
     {
       assert (c != NULL);
       assert (model_file != NULL);
-      fp = fopen (fh_get_filename (model_file), "w");
+      fp = fopen (fh_get_file_name (model_file), "w");
       assert (fp != NULL);
       fprintf (fp, "%s", reg_preamble);
       reg_print_getvar (fp, c);