From: Christopher Allan Webber Date: Mon, 23 Jan 2017 20:47:52 +0000 (-0600) Subject: some improvements to asking about things X-Git-Tag: fosdem-2017~95 X-Git-Url: https://jxself.org/git/?p=mudsync.git;a=commitdiff_plain;h=80b100aa206cc865238f055d8c2b809586566064 some improvements to asking about things --- diff --git a/worlds/bricabrac.scm b/worlds/bricabrac.scm index 463a715..3ce948d 100644 --- a/worlds/bricabrac.scm +++ b/worlds/bricabrac.scm @@ -518,7 +518,7 @@ feel free to walk around and explore."))) (define clerk-knows-about - "'changing name', 'common commands', and 'about the hotel'") + "'ask clerk about changing name', 'ask clerk about common commands', and 'ask clerk about the hotel'") (define clerk-general-helpful-line (string-append @@ -548,7 +548,7 @@ with tuition at where it is...")) (random-choice clerk-slacking-complaints) "\"\n"))))) -(define (clerk-cmd-ask-incomplete clerk message) +(define (clerk-cmd-ask-incomplete clerk message . _) (<- (message-from message) 'tell #:text "The clerk says, \"Ask about what?\"\n"))