GNU standards require "file name" instead of "filename" in

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

diff --git a/src/language/stats/regression.q b/src/language/stats/regression.q
index d5536e80b58ce78d650f48ee0598a007fae0f498..737a25fdce4b4b2f03008ca8279d9b9b70a6ba73 100644 (file)
--- 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);