focus main window when mouse leaves SNAP or GRID text entries

This commit is contained in:
Stefan Frederik 2022-08-14 08:17:44 +02:00
parent 4d97eb809e
commit 86311f8d47
1 changed files with 4 additions and 2 deletions

View File

@ -4802,8 +4802,10 @@ proc pack_widgets { { topwin {} } } {
} }
toolbar_show $topwin toolbar_show $topwin
pack $topwin.statusbar -after $topwin.drw -anchor sw -fill x pack $topwin.statusbar -after $topwin.drw -anchor sw -fill x
bind $topwin.statusbar.5 <Leave> "set cadgrid \[$topwin.statusbar.5 get\]; xschem set cadgrid \$cadgrid" bind $topwin.statusbar.5 <Leave> \
bind $topwin.statusbar.3 <Leave> "set cadsnap \[$topwin.statusbar.3 get\]; xschem set cadsnap \$cadsnap" "focus $topwin.drw; set cadgrid \[$topwin.statusbar.5 get\]; xschem set cadgrid \$cadgrid"
bind $topwin.statusbar.3 <Leave> \
"focus $topwin.drw; set cadsnap \[$topwin.statusbar.3 get\]; xschem set cadsnap \$cadsnap"
} }
} }