[Pspp-cvs] Changes to pspp/src/list.q

[Ben Pfaff]

Index: pspp/src/list.q
diff -u pspp/src/list.q:1.15 pspp/src/list.q:1.16
--- pspp/src/list.q:1.15        Mon May  2 06:21:20 2005
+++ pspp/src/list.q     Tue May 17 05:46:39 2005
@@ -204,9 +204,9 @@
       strcpy (casenum_var.name, "Case#");
       casenum_var.type = NUMERIC;
       casenum_var.fv = -1;
-      casenum_var.print.type = FMT_F;
-      casenum_var.print.w = (cmd.last == LONG_MAX ? 5 : intlog10 (cmd.last));
-      casenum_var.print.d = 0;
+      casenum_var.print = make_output_format (FMT_F,
+                                              (cmd.last == LONG_MAX
+                                               ? 5 : intlog10 (cmd.last)), 0);
 
       /* Add the weight variable at the beginning of the variable list. */
       cmd.n_variables++;