From bdaa51cbb3c82ddedaced1e18a40fd024e18d46e Mon Sep 17 00:00:00 2001 From: Ekaitz Zarraga Date: Sun, 6 Nov 2022 16:08:30 +0100 Subject: Use the banner correctly --- wake-up.scm | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/wake-up.scm b/wake-up.scm index b6ff104..e6e7d6b 100644 --- a/wake-up.scm +++ b/wake-up.scm @@ -396,10 +396,7 @@ (tire+) (depress) (next-day) - (lambda () - (newline) - (display (string-append "Days " (number->string (*day*)))) - (newline)) + (day-banner) (to-state 'wake-up))))))) ((to-state 'start)) -- cgit v1.2.3