X-Git-Url: https://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=form%2Ffld_def.c;h=b8c69d30a4292d8572ed4069b5a1d4274fbc2005;hp=3559ba67241c0665fbc444bda251b49a9ec7306d;hb=bbb7fd37298f7d81386a4cf868417b9e084d7d90;hpb=491a3f08b795f494ae17179338c31a11b18fd433;ds=sidebyside

diff --git a/form/fld_def.c b/form/fld_def.c
index 3559ba67..b8c69d30 100644
--- a/form/fld_def.c
+++ b/form/fld_def.c
@@ -32,7 +32,7 @@
 
 #include "form.priv.h"
 
-MODULE_ID("$Id: fld_def.c,v 1.36 2007/10/13 19:29:58 tom Exp $")
+MODULE_ID("$Id: fld_def.c,v 1.37 2009/02/28 19:00:51 juergen Exp $")
 
 /* this can't be readonly */
 static FIELD default_field =
@@ -252,8 +252,8 @@ _nc_Free_Type(FIELD *field)
   if (field->type != 0)
     {
       field->type->ref--;
+      _nc_Free_Argument(field->type, (TypeArgument *)(field->arg));
     }
-  _nc_Free_Argument(field->type, (TypeArgument *)(field->arg));
 }
 
 /*---------------------------------------------------------------------------