From 25969db825bf609cd5be9c5cee83bed15d4c62b0 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Fri, 24 Jul 2020 19:59:24 -0700 Subject: Different banner text for plain mode. * txr.c (banner): In plain mode, indicate that the mode is in effect. Do not suggest any Ctrl-X commands, since they are not recognized. --- txr.c | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/txr.c b/txr.c index 43471029..d0fbcfaa 100644 --- a/txr.c +++ b/txr.c @@ -177,8 +177,12 @@ static void help(void) static void banner(void) { format(std_output, - lit("This is the TXR Lisp interactive listener of TXR ~a.\n" - "Quit with :quit or Ctrl-D on empty line. Ctrl-X ? for cheatsheet.\n"), + if3(opt_noninteractive, + lit("This is the TXR Lisp plain mode listener of TXR ~a.\n" + "Quit wth :quit or Ctrl-D on an empty line.\n"), + lit("This is the TXR Lisp interactive listener of TXR ~a.\n" + "Quit with :quit or Ctrl-D on an empty line. " + "Ctrl-X ? for cheatsheet.\n")), static_str(version), nao); } #else -- cgit v1.2.3