-
This commit is contained in:
@@ -49,6 +49,8 @@
|
||||
(when (symbol? (car items))
|
||||
(set! menu-id (car items))
|
||||
(set! items (cdr items)))
|
||||
(when (list? (car items))
|
||||
(set! items (car items)))
|
||||
(make-ww-menu menu-id items)))
|
||||
|
||||
(define (menu-item id title
|
||||
|
||||
Reference in New Issue
Block a user