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
+3 -2
View File
@@ -8551,9 +8551,10 @@ proc show_bindkeys {} {
# set dark_colorscheme $save # set dark_colorscheme $save
# xschem build_colors # xschem build_colors
bind .bk <ButtonPress> {xschem preview_window destroy .bk } bind .bk <ButtonPress> {xschem preview_window destroy .bk}
bind .bk <KeyPress> {xschem preview_window destroy .bk } bind .bk <KeyPress> {xschem preview_window destroy .bk}
bind .bk <Expose> {xschem preview_window draw .bk } bind .bk <Expose> {xschem preview_window draw .bk }
wm protocol .bk WM_DELETE_WINDOW {xschem preview_window destroy .bk}
} }
proc set_bindings {topwin} { proc set_bindings {topwin} {