style issues

This commit is contained in:
David Botton 2021-02-15 09:15:11 -05:00
parent 68a4310f9d
commit 37e17177e5
2 changed files with 3 additions and 3 deletions

View file

@ -180,10 +180,11 @@ clog-body."))
(:documentation "Drop down containing windows. Selecting a window
will maximize it on top."))
(defgeneric create-gui-menu-window-select (clog-gui-menu-drop-down
(defgeneric create-gui-menu-window-select (clog-obj
&key class
html-id)
(:documentation "Attached a menu item to a CLOG-GUI-MENU-DROP-DOWN"))
(:documentation "Attached a clog-select as a menu item that auto updates
with open windows and maximizes them."))
(defmethod create-gui-menu-window-select
((obj clog-obj)

View file

@ -69,7 +69,6 @@
(help (create-gui-menu-drop-down menu :content "Help"))
(tmp (create-gui-menu-item help :content "About" :on-click #'on-help-about))
(tmp (create-gui-menu-full-screen menu))))
(run body))
(defun start-tutorial ()