diff --git a/gdb/ChangeLog-gdbtk b/gdb/ChangeLog-gdbtk
index 5372df0ea4..aa70a6368f 100644
--- a/gdb/ChangeLog-gdbtk
+++ b/gdb/ChangeLog-gdbtk
@@ -1,3 +1,8 @@
+Fri Jun  5 00:16:22 1998  Martin M. Hunt  <hunt@cygnus.com>
+
+	* gdbtk.c (gdbtk_init): Change all references to
+	GDBTK_IDE to IDE_ENABLED.
+
 Thu Jun  4 18:31:53 1998  Martin M. Hunt  <hunt@cygnus.com>
 
 	* gdbtk.c (gdbtk_init): Initialize tkTable.
diff --git a/gdb/gdbtk.c b/gdb/gdbtk.c
index 21222fe608..c8451dcc8c 100644
--- a/gdb/gdbtk.c
+++ b/gdb/gdbtk.c
@@ -2191,7 +2191,7 @@ gdbtk_init ( argv0 )
 			(char *) NULL);
       fprintf(stderr, "WARNING: ide_event_init_client failed: %s\n", interp->result);
 
-      Tcl_SetVar (interp, "GDBTK_IDE", "0", 0);
+      Tcl_SetVar (interp, "IDE_ENABLED", "0", 0);
     }
   else 
     {
@@ -2226,11 +2226,11 @@ gdbtk_init ( argv0 )
 	error ("ide_initialize failed: %s", interp->result);
       */
 
-      Tcl_SetVar (interp, "GDBTK_IDE", "1", 0);
+      Tcl_SetVar (interp, "IDE_ENABLED", "1", 0);
     }
   /* end-sanitize-ide */
 #else
-  Tcl_SetVar (interp, "GDBTK_IDE", "0", 0);
+  Tcl_SetVar (interp, "IDE_ENABLED", "0", 0);
 #endif /* IDE */
 
   /* We don't want to open the X connection until we've done all the