(short_names_assign): Fix dumb typo, in which `i' was written where

[pspp-builds.git] / src / data / short-names.c

diff --git a/src/data/short-names.c b/src/data/short-names.c
index 3ed99c04c2417792696f2eafe72351fb571f47f7..6a997f53f24ae9e6c04a5b0f80f007785f5e9ee1 100644 (file)
--- a/src/data/short-names.c
+++ b/src/data/short-names.c
@@ -181,7 +181,7 @@ short_names_assign (struct dictionary *d)
       struct variable *v = dict_get_var (d, i);
       int segment_cnt = sfm_width_to_segments (var_get_width (v));
       for (j = 1; j < segment_cnt; j++)
-        claim_short_name (v, i, short_names);
+        claim_short_name (v, j, short_names);
     }
 
   /* Assign short names to first segment of remaining variables,