From 30a05bf9176867bf3a89529301e2926aef2d13ca Mon Sep 17 00:00:00 2001 From: EuAndreh Date: Mon, 22 Aug 2022 18:16:09 -0300 Subject: bin/nato: Add missing handling of -h flag --- bin/nato | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/bin/nato b/bin/nato index 6ea66b5..75c208e 100755 --- a/bin/nato +++ b/bin/nato @@ -49,6 +49,12 @@ if (!Getopt::Std::getopts('h', \%opts)) { exit 2; } +if ($opts{h}) { + usage *STDOUT; + help *STDOUT; + exit; +} + my %DICT = ( 'a' => 'Alfa', 'b' => 'Bravo', -- cgit v1.2.3