Update documentation

This commit is contained in:
David Botton 2024-03-22 02:10:21 -04:00
parent 2060e712e2
commit d7ffe09bc1
3 changed files with 38 additions and 59 deletions

View file

@ -410,6 +410,7 @@ clog-body. If main-menu add as main menu bar."))
(let* ((div (create-div obj :class class :html-id html-id))
(blank (create-a div))
(app (connection-data-item obj "clog-gui")))
(declare (ignore blank))
(change-class div 'clog-gui-menu-bar)
(when main-menu
(setf (menu app) div))