From 5620127c71755db85a11840673507c704c27f44f Mon Sep 17 00:00:00 2001 From: Richard Hansen Date: Mon, 24 Jun 2024 02:09:57 -0400 Subject: [PATCH] Delete unnecessary comments --- ddclient.in | 5 ----- 1 file changed, 5 deletions(-) diff --git a/ddclient.in b/ddclient.in index e004a80..729bdb3 100755 --- a/ddclient.in +++ b/ddclient.in @@ -1228,7 +1228,6 @@ my @opt = ( ); sub main { - ## process args my $opt_usage = process_args(@opt); $saved_recap = ''; %saved_opt = %opt; @@ -2027,15 +2026,12 @@ sub process_args { my ($key, $specifier, $arg_usage) = @$_; my $value = default($key); - ## add a option specifier push @spec, $key . $specifier; - ## define the default value which can be overwritten later $opt{$key} //= undef; next unless $arg_usage; - ## add a line to the usage; $usage .= " $arg_usage"; if (defined($value) && $value ne '') { $usage .= " (default: "; @@ -2053,7 +2049,6 @@ sub process_args { } $usage .= "\n"; } - ## process the arguments if (!GetOptions(\%opt, @spec)) { $opt{"help"} = 1; }