Re: Insight working directory change?

[Keith Seitz <keiths at cygnus dot com>]

On Sun, 6 May 2001, Mo DeJong wrote:

> Has someone changed something related to how the working
> directory is set in insight recently? I just did a cvs
> update and a rebuild and now I am having some real problems
> with Insight because it keeps doing a cd to the
> $INSTALL/share/gdbtcl directory behind my back.
> I can go to the prompt and run `tk cd $DIR` to
> get back to my directory but that only works
> once. If I hit the run button it will cd back to
> the gdbtcl directory.

I've updated my sources (8:00am today) and rebuilt and reinstalled. From
either the install directory or the objdir, I am where I expect to be when
I run Insight.

Insight will cd to the GDBTK_LIBRARY directory ($INSTALL/share/gdbtcl)
when you open the global preferences window. I have verified that this
does change the current working directory to $INSTALLDIR/share/gdbtcl.

This patch fixes the problem. Let me know, and I'll check it in:
Index: globalpref.itb
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/library/globalpref.itb,v
retrieving revision 1.2
diff -u -r1.2 globalpref.itb
--- globalpref.itb	2000/11/01 22:15:37	1.2
+++ globalpref.itb	2001/05/07 15:06:29
@@ -76,6 +76,7 @@
     -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 @@
       lappend icondirlist $foo
     }
   }
-
+  cd $curdir
+
   set width 14
   # load combobox
   set imagedir [pref get gdb/ImageDir]

Keith