From 58db61fb38c9948f03b60383eb89a0bb257b4812 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Mon, 23 May 2016 16:16:56 -0700 Subject: Bugfix: strange diagostic for -B-c. * txr.c (txr_main): Diagnose unrecognized long option in if/else statement that handles long options, rather than clumsily in switch for non-clumping options. --- txr.c | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/txr.c b/txr.c index dc439209..aa1a5eaa 100644 --- a/txr.c +++ b/txr.c @@ -665,6 +665,11 @@ int txr_main(int argc, char **argv) opt_noninteractive = 1; stream_set_prop(std_input, real_time_k, nil); continue; + } else { + drop_privilege(); + format(std_error, lit("~a: unrecognized long option: --~a\n"), + prog_string, opt, nao); + return EXIT_FAILURE; } } @@ -793,8 +798,8 @@ int txr_main(int argc, char **argv) return EXIT_FAILURE; case '-': drop_privilege(); - format(std_error, lit("~a: unrecognized long option: --~a\n"), - prog_string, cdr(optchars), nao); + format(std_error, lit("~a: dash in the middle of options: ~a\n"), + prog_string, arg, nao); return EXIT_FAILURE; default: drop_privilege(); -- cgit v1.2.3