diff options
author | treectrl <treectrl> | 2005-06-08 01:26:15 (GMT) |
---|---|---|
committer | treectrl <treectrl> | 2005-06-08 01:26:15 (GMT) |
commit | dce5d77cba8451f985d42d206b6c0cb6379e5273 (patch) | |
tree | 7e5da4cb875f5eb4b5ef1fa289ae36d6a6908fdc /library | |
parent | 37963042bcb53a4ca93cff1a68e712fea337acd3 (diff) | |
download | tktreectrl-dce5d77cba8451f985d42d206b6c0cb6379e5273.zip tktreectrl-dce5d77cba8451f985d42d206b6c0cb6379e5273.tar.gz tktreectrl-dce5d77cba8451f985d42d206b6c0cb6379e5273.tar.bz2 |
Removed the <Destroy> binding on the name-editting window since qebind.c now automatically deletes bindings on a Tk window when that window is destroyed.
Diffstat (limited to 'library')
-rw-r--r-- | library/filelist-bindings.tcl | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/library/filelist-bindings.tcl b/library/filelist-bindings.tcl index ed2743a..7d9b343 100644 --- a/library/filelist-bindings.tcl +++ b/library/filelist-bindings.tcl @@ -605,9 +605,6 @@ proc ::TreeCtrl::EntryExpanderOpen {T item column element} { TreeCtrl::EntryClose %T 0 focus $TreeCtrl::Priv(entry,%T,focus) } - bind $T.entry <Destroy> { - [winfo parent %W] notify bind %W <Scroll> {} - } $T.entry configure -font $font -background [$T cget -background] $T.entry insert end $text @@ -727,9 +724,6 @@ proc ::TreeCtrl::TextOpen {T item column element {width 0} {height 0}} { TreeCtrl::TextClose %T 0 focus $TreeCtrl::Priv(text,%T,focus) } - bind $T.text <Destroy> { - [winfo parent %W] notify bind %W <Scroll> {} - } $T.text tag configure TAG -justify [$T element cget $element -justify] $T.text configure -font $font @@ -810,9 +804,6 @@ proc ::TreeCtrl::TextExpanderOpen {T item column element width} { TreeCtrl::TextClose %T 0 focus $TreeCtrl::Priv(text,%T,focus) } - bind $T.text <Destroy> { - [winfo parent %W] notify bind %W <Scroll> {} - } $T.text tag configure TAG -justify $justify $T.text configure -font $font -background [$T cget -background] |