diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index a48ff61c53..2c48942256 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2000-02-14  Elena Zannoni  <ezannoni@kwikemart.cygnus.com>
+
+	* lib/gdb.exp: Tell the testsuite that now gdbtk is in the
+ 	gdbtk/library directory, not in gdbtcl2.
+
 2000-02-04  Jim Blandy  <jimb@redhat.com>
 
 	* gdb.c++/templates.exp: ("ptype T5<int>"): Remove extraneous
diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp
index 94cd40a091..1a5ecc88e9 100644
--- a/gdb/testsuite/lib/gdb.exp
+++ b/gdb/testsuite/lib/gdb.exp
@@ -1618,7 +1618,7 @@ proc gdbtk_start {test} {
   }
 
   set wd [pwd]
-  cd [file join $srcdir .. gdbtcl2]
+  cd [file join $srcdir .. gdbtk library]
   set env(GDBTK_LIBRARY) [pwd]
   cd [file join $srcdir .. .. tcl library]
   set env(TCL_LIBRARY) [pwd]