From 5fb2011a5a7d63dd694d49944a114562bfe764ca Mon Sep 17 00:00:00 2001
From: Jason H Stover <jhs@math.gcsu.edu>
Date: Mon, 4 May 2009 12:06:50 -0400
Subject: [PATCH] Remove call to var_set_width

---
 src/math/interaction.c | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/src/math/interaction.c b/src/math/interaction.c
index 33da8423..05a8bf46 100644
--- a/src/math/interaction.c
+++ b/src/math/interaction.c
@@ -73,7 +73,6 @@ interaction_variable_create (const struct variable **vars, int n_vars)
       result = xmalloc (sizeof (*result));
       result->n_alpha = 0;
       result->members = xnmalloc (n_vars, sizeof (*result->members));
-      result->intr = var_create_internal (0);
       result->n_vars = n_vars;
       for (i = 0; i < n_vars; i++)
 	{
@@ -84,10 +83,7 @@ interaction_variable_create (const struct variable **vars, int n_vars)
 	    }
 	}
     }
-  /*
-    VAR_SET_WIDTH sets the type of the variable.
-   */
-  var_set_width (result->intr, MAX_SHORT_STRING * result->n_alpha + 1);
+  result->intr = var_create_internal (0);
 
   return result;
 }
-- 
2.30.2