Commit bd0254c5 authored by Ivica Bukvic's avatar Ivica Bukvic
Browse files

*further refined workaround for the open panels and stuck ctrl key

parent cec0f122
...@@ -1233,8 +1233,10 @@ proc menu_new {} { ...@@ -1233,8 +1233,10 @@ proc menu_new {} {
proc reset_ctrl_on_popup_window {} { proc reset_ctrl_on_popup_window {} {
global menu_windowlist global menu_windowlist
set first_patch_window_name [lindex $menu_windowlist 0 1] set first_patch_window_name [lindex $menu_windowlist 0 1]
pdtk_canvas_sendkey $first_patch_window_name.c 0 Control_L null 0 1 -1 if { $first_patch_window_name != "" } {
pdtk_canvas_sendkey $first_patch_window_name.c 0 Control_R null 0 1 -1 pdtk_canvas_sendkey $first_patch_window_name.c 0 Control_L null 0 1 -1
pdtk_canvas_sendkey $first_patch_window_name.c 0 Control_R null 0 1 -1
}
} }
################## the "Open" menu command ######################### ################## the "Open" menu command #########################
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment