Index: toltcl/generic/tolaccess.cpp
===================================================================
--- toltcl/generic/tolaccess.cpp	(revision 08e78b9912c7aa65d8edbbd6a835f6ecb1714d68)
+++ toltcl/generic/tolaccess.cpp	(revision 2a670e5d6cffcfda7665c3f88b72e78d9bdf2c51)
@@ -1785,5 +1785,5 @@
 int Tol_InfoVersion( Tcl_Interp * interp,  Tcl_Obj * obj_result )
 {
-#define VERSION_INFO_SIZE 4*2
+#define VERSION_INFO_SIZE 3*2
  
   Tcl_Obj * items[VERSION_INFO_SIZE];
@@ -1796,11 +1796,7 @@
   items[2] = Tcl_NewStringObj( "minor", -1 );
   items[3] = Tcl_NewIntObj( VERSION_MINOR );
-  /* Release Info */
-  items[4] = Tcl_NewStringObj( "release", -1 );
-  sprintf(buffer,"%d", VERSION_RELEASE);
-  items[5] = Tcl_NewStringObj(buffer, -1);
   /* Comment Info */
-  items[6] = Tcl_NewStringObj( "comment", -1 );
-  items[7] = Tcl_NewStringObj(TOLVersionBuild(), -1 );
+  items[4] = Tcl_NewStringObj( "comment", -1 );
+  items[5] = Tcl_NewStringObj(TOLVersionBuild(), -1 );
   /* asign the items to the result list */
   Tcl_SetListObj( obj_result, VERSION_INFO_SIZE, items );