(<-reply-wait first-reply
#:msg "Yes, it didn't work, I'm VERY ANGRY!")
(if (message-auto-reply? second-reply)
(~display "customer> Well then! Harumph.\n")
(error "Not an autoreply? What's going on here...")))))))
(<-reply-wait first-reply
#:msg "Yes, it didn't work, I'm VERY ANGRY!")
(if (message-auto-reply? second-reply)
(~display "customer> Well then! Harumph.\n")
(error "Not an autoreply? What's going on here...")))))))