diff --git a/game.scm b/game.scm index 02dfc37..de64010 100644 --- a/game.scm +++ b/game.scm @@ -359,9 +359,9 @@ (set-menu-state-history! *menu* history)) ;; Menu commands -(define* (show-menu! #:optional menu) +(define* (show-menu! #:optional (menu menu:main)) (push-game-state! 'menu) - (set-menu! (or menu menu:main)) + (set-menu! menu) (set-menu-index! -1) (set-menu-page! 0) (set-menu-history! '()))