From b38ab95e21d572cc0798fee0505c009a6b7587b6 Mon Sep 17 00:00:00 2001
From: Slack Coder <slackcoder@server.ky>
Date: Thu, 20 Feb 2025 14:57:16 -0500
Subject: Fail on bad arguments for remaining commands

---
 SBO-Lib/lib/SBO/App/Snap.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'SBO-Lib/lib/SBO/App/Snap.pm')

diff --git a/SBO-Lib/lib/SBO/App/Snap.pm b/SBO-Lib/lib/SBO/App/Snap.pm
index 64487d7..d98bbc1 100644
--- a/SBO-Lib/lib/SBO/App/Snap.pm
+++ b/SBO-Lib/lib/SBO/App/Snap.pm
@@ -26,13 +26,13 @@ sub _parse_opts {
 
   my ($help, $vers);
 
-  GetOptionsFromArray(
+  my $res = GetOptionsFromArray(
     \@ARGS,
     'help|h' => \$help,
     'version|v' => \$vers,
   );
 
-  return { help => $help, vers => $vers, args => \@ARGS, };
+  return ({ help => $help, vers => $vers, args => \@ARGS, }, $res);
 }
 
 sub show_usage {
-- 
cgit v1.2.3