aboutsummaryrefslogtreecommitdiffhomepage
path: root/gui/menus.lisp
diff options
context:
space:
mode:
authorColin Okay <okay@toyful.space>2022-07-23 15:01:13 -0500
committerColin Okay <okay@toyful.space>2022-07-23 15:01:13 -0500
commit2bf554b6b349bc640287d41a43e89806386a41c8 (patch)
treebb54c32acec94f5362a4eaf8faaee2d813cb537e /gui/menus.lisp
parentc32f78283706c3249ddb73577eff5297cd14390e (diff)
[refactor] event-handlers to include a tag
Diffstat (limited to 'gui/menus.lisp')
-rw-r--r--gui/menus.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/gui/menus.lisp b/gui/menus.lisp
index 6c3e5b8..0e51aba 100644
--- a/gui/menus.lisp
+++ b/gui/menus.lisp
@@ -59,7 +59,7 @@
(defgeneric add-menu-item (menu item))
(defmethod add-menu-item ((menu menu) item)
(setf (unit-region item) (unit-region menu)
- (focusablep item) nil)
+ (focusablep item) nil) ; so that event handling here doesn't steal menu focus
(setf (menu-items menu)
(nconc (menu-items menu) (list item)))
(when (unit-in-scene-p menu)