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.

1 files 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();