mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-06 02:30:42 -08:00
Code Issues Projects Releases Wiki Activity

creat-menu missing :main-menu nil

Browse source
This commit is contained in:
David Botton 2024-03-20 12:09:19 -04:00
parent b63ecf2c26
commit 37da492e64
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
tutorial/22-tutorial.lisp
View file

@ -14,7 +14,7 @@
(defun on-file-with-menu (obj)
(let ((win (create-gui-window obj :title "Window With Menu")))
(let* ((menu (create-gui-menu-bar (window-content win)))
(let* ((menu (create-gui-menu-bar (window-content win) :main-menu nil))
(file (create-gui-menu-drop-down menu :content "Menu 1"))
(tmp (create-gui-menu-item file :content "Count" :on-click 'on-file-count))
(file (create-gui-menu-drop-down menu :content "Menu 2"))