From 8121da0a1c26029e5d3266870f9c3abea304d2b1 Mon Sep 17 00:00:00 2001
From: brian d foy <briandfoy@pobox.com>
Date: Fri, 8 Sep 2023 14:33:49 -0400
Subject: [PATCH] Give a warning for every bad character in the message

---
 bin/banner | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/bin/banner b/bin/banner
index 5880c668..d0b8a79b 100755
--- a/bin/banner
+++ b/bin/banner
@@ -67,13 +67,16 @@ else {
 }
 
 # check message
+my $char_error;
 while ($message =~ /(.)/g) {
   unless ($ascii_to_table{$1}) {
     warn "$Program: The character `$1' is not in my character set\n";
-    exit EX_FAILURE;
+    $char_error++;
   }
 }
 
+exit EX_FAILURE if $char_error;
+
 # print banner
 while ($message =~ /(.)/g) {
   my @line = (' ') x DWIDTH;