From 4bc8940399fd7c5eea7b79cc0d97a1196c763a33 Mon Sep 17 00:00:00 2001 From: nixo Date: Thu, 7 Jan 2021 18:44:29 +0100 Subject: [PATCH] fix chose/choose, replace selected with chose --- run.scm | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/run.scm b/run.scm index 0c9780f..5e6c39b 100644 --- a/run.scm +++ b/run.scm @@ -59,31 +59,31 @@ (begin (background paper) (nixo "This is not an exam!")) - (nixo "Chose one and press enter!") + (nixo "Choose one and press enter!") (nixo - (format #f "You choose: ~a\n" + (format #f "You chose: ~a\n" (menu '("Select me!" "Or me!" "No, select me!") #:prototype radio-button))) - (nixo "Chose as many as you want!") + (nixo "Choose as many as you want!") (nixo - (format #f "You selected: ~a\n" + (format #f "You chose ~a\n" (menu '(("A") ("B") ("C")) #:prototype checkbox-button #:seed '() #:pressed cons))) (nixo "Click it!") (nixo - (format #f "You selected the element number: ~a\n" + (format #f "You chose the element number: ~a\n" (menu '("Yes" "Maybe" "No way")))) (nixo "Click it again!") (nixo - (format #f "You selected the element: ~a\n" + (format #f "You chose the element: ~a\n" (menu '(("Yes") ("Maybe") ("No way"))))) (nixo "Once more!") (nixo - (format #f "You selected the element: ~a\n" + (format #f "You chose the element: ~a\n" (menu '(("Yes" . yep) ("Maybe" . maybe) ("No way" . nope))))) *unspecified*))