register WM_DELETE_WINDOW action to correctly close bindkey window

This commit is contained in:
stefan schippers 2025-04-28 00:48:01 +02:00
parent d3b5e999f4
commit 281c38b32d
1 changed files with 3 additions and 2 deletions

View File

@ -8551,9 +8551,10 @@ proc show_bindkeys {} {
# set dark_colorscheme $save
# xschem build_colors
bind .bk <ButtonPress> {xschem preview_window destroy .bk }
bind .bk <KeyPress> {xschem preview_window destroy .bk }
bind .bk <ButtonPress> {xschem preview_window destroy .bk}
bind .bk <KeyPress> {xschem preview_window destroy .bk}
bind .bk <Expose> {xschem preview_window draw .bk }
wm protocol .bk WM_DELETE_WINDOW {xschem preview_window destroy .bk}
}
proc set_bindings {topwin} {