diff options
| author | treectrl <treectrl> | 2005-06-02 22:07:43 (GMT) |
|---|---|---|
| committer | treectrl <treectrl> | 2005-06-02 22:07:43 (GMT) |
| commit | 36501ea2b4e57b996ac1939e274e838d913dea1c (patch) | |
| tree | 392ab1db013d93015f21ea0b96197f7fe12793ce /demos | |
| parent | ab6322dc3c766a0ad754cc81d398173a3ec1499f (diff) | |
| download | tktreectrl-36501ea2b4e57b996ac1939e274e838d913dea1c.zip tktreectrl-36501ea2b4e57b996ac1939e274e838d913dea1c.tar.gz tktreectrl-36501ea2b4e57b996ac1939e274e838d913dea1c.tar.bz2 | |
Use "window" element type's new -destroy option to destroy associated window when element is deleted.
Diffstat (limited to 'demos')
| -rw-r--r-- | demos/firefox.tcl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/demos/firefox.tcl b/demos/firefox.tcl index 49c1187..aeba7ee 100644 --- a/demos/firefox.tcl +++ b/demos/firefox.tcl @@ -63,6 +63,10 @@ proc DemoFirefoxPrivacy {} { $T element create eRectTop rect -outline {black open} -fill {#FFFFCC open} -outlinewidth 1 -open s $T element create eRectBottom rect -outline black -fill #FFFFCC -outlinewidth 1 -open n + # Destroy the window when the element is deleted. Could also bind to the + # <ItemDelete> event. + $T element configure eWindow -destroy yes + # # Create styles using the elements # |