* library/globalpref.itb (build_win): Preserve the

	current working directory.

diff --git a/gdb/gdbtk/ChangeLog b/gdb/gdbtk/ChangeLog
index 9e9a574..6534fb6 100644 (file)
--- a/gdb/gdbtk/ChangeLog
+++ b/gdb/gdbtk/ChangeLog
@@ -1,3 +1,8 @@
+2001-05-07  Keith Seitz  <keiths@cygnus.com>
+
+       * library/globalpref.itb (build_win): Preserve the
+       current working directory.
+
 2001-05-06  Kevin Buettner  <kevinb@redhat.com>
 
        * generic/gdbtk-cmds.c (gdb_target_has_execution_command)

diff --git a/gdb/gdbtk/library/globalpref.itb b/gdb/gdbtk/library/globalpref.itb
index a7eb809..d1c1cd7 100644 (file)
--- a/gdb/gdbtk/library/globalpref.itb
+++ b/gdb/gdbtk/library/globalpref.itb
@@ -76,6 +76,7 @@ body GlobalPref::build_win {} {
     -command [code $this change_icons]
   
   # get list of icon directories
+  set curdir [pwd]
   set icondirlist ""
   cd $GDBTK_LIBRARY
   foreach foo [glob -- *] {
@@ -83,7 +84,8 @@ body GlobalPref::build_win {} {
       lappend icondirlist $foo
     }
   }
-  
+  cd $curdir
+
   set width 14
   # load combobox
   set imagedir [pref get gdb/ImageDir]