Hovering other menu titles while one is open will drop down the other menus, even wihout holding down mouse button1
This commit is contained in:
parent
1e75d69dfe
commit
1a14adaade
|
|
@ -7780,6 +7780,7 @@ proc build_widgets { {topwin {} } } {
|
|||
} else {
|
||||
set selectcolor black
|
||||
}
|
||||
|
||||
frame $topwin.menubar -relief raised -bd 2
|
||||
menubutton $topwin.menubar.file -text "File" -menu $topwin.menubar.file.menu
|
||||
menu $topwin.menubar.file.menu -tearoff 0
|
||||
|
|
@ -7804,6 +7805,8 @@ proc build_widgets { {topwin {} } } {
|
|||
menubutton $topwin.menubar.help -text "Help" -menu $topwin.menubar.help.menu
|
||||
menu $topwin.menubar.help.menu -tearoff 0
|
||||
|
||||
# activate menus when hovering the mouse, even without button pressed
|
||||
bind Menubutton <Motion> { tk::MbMotion %W down %X %Y}
|
||||
|
||||
$topwin.menubar.help.menu add command -label "Help" -command "textwindow \"${XSCHEM_SHAREDIR}/xschem.help\" ro" \
|
||||
-accelerator {?}
|
||||
|
|
|
|||
Loading…
Reference in New Issue