Re: Delete applications hang for tkined 1.4.2

Juergen Schoenwaelder (schoenw@cs.utwente.nl)
Thu, 5 Sep 1996 10:50:23 +0200

Ralf Kalwa <kalwa@imw.tu-clausthal.de> said:

Ralf> According to Peter Maersk-Moller:
>
> On my Solaris 2.5/gcc2.5.6/tcl7.5/Tk4.1\scotty2.1.2\tkined1.4.2 the function
> "delete application" where application can be ip_trouble, ip_discover etc.,
> hangs. That is the menu turns gray but nothing else happens.

Ralf> I am running Solaris2.5/cc SC4.0/tcl7.5p1/Tk4.1p1/scotty2.1.2
Ralf> and the menu also turns gray and nothing else happens - sight :(

Ouch. Yes, there is serious problem that slipped into 2.1.2. Below is
patch to fix it. I will release 2.1.3 later to get rid of it.

diff -N -c -r /tmp/scotty-2.1.2/tkined/library/Objects.tcl ./tkined/library/Objects.tcl
*** /tmp/scotty-2.1.2/tkined/library/Objects.tcl Mon Sep 2 16:30:07 1996
--- ./tkined/library/Objects.tcl Thu Sep 5 10:35:56 1996
***************
*** 666,673 ****
set w [winfo parent $c]

set dady $w.menu.[$menu id].m
! foreach child $tornoff($dady) {
! destroy $child
}

destroy $w.menu.[$menu id]
--- 666,675 ----
set w [winfo parent $c]

set dady $w.menu.[$menu id].m
! if [info exists tornoff($dady)] {
! foreach child $tornoff($dady) {
! destroy $child
! }
}

destroy $w.menu.[$menu id]

Juergen

--
Juergen Schoenwaelder schoenw@cs.utwente.nl http://www.cs.utwente.nl/~schoenw
Computer Science Department, University of Twente,   (Fax: +31-53-489-3247)
P.O. Box 217, NL-7500 AE Enschede, The Netherlands.  (Tel. +31-53-489-3678)