MT#65090 generate_invoices: Remove obsolete backwards compatibility code

This is no longer used, so it can be removed.

Change-Id: Ib21a1544ffc8783ce07788c6337056deb95a2e0e
master
Guillem Jover 4 weeks ago
parent a8ec178bcb
commit 42a254e5ab

@ -21,23 +21,6 @@ my $opt = {};
my $opt_cfg = {};
my $cfg_raw = {};
# XXX: Remove after mr10.5.
sub old_scalar_option {
my ($name, $value) = @_;
my $newname = $name =~ tr/_/-/r;
$opt->{$name} = $value;
warn "$0: option --$name is deprecated; use --$newname instead\n";
}
# XXX: Remove after mr10.5.
sub old_array_option {
my ($name, $value) = @_;
my $newname = $name =~ tr/_/-/r;
push @{$opt->{$name}}, $value;
warn "$0: option --$name is deprecated; use --$newname instead\n";
}
sub parse_scalar_option {
my ($name, $value) = @_;
$name =~ tr/-/_/;
@ -51,11 +34,8 @@ sub parse_array_option {
}
my @opt_spec = (
'reseller_id=i@' => \&old_array_option,
'reseller-id=i@' => \&parse_array_option,
'client_contact_id=i@' => \&old_array_option,
'client-contact-id=i@' => \&parse_array_option,
'client_contract_id=i@' => \&old_array_option,
'client-contract-id=i@' => \&parse_array_option,
'stime=s',
'etime=s',
@ -64,17 +44,11 @@ my @opt_spec = (
'send',
'resend',
'regenerate',
'allow_terminated' => \&old_scalar_option,
'allow-terminated' => \&parse_scalar_option,
'backward_is_active' => \&old_scalar_option,
'backward-is-active' => \&parse_scalar_option,
'update_contract_balance' => \&old_scalar_option,
'update-contract-balance' => \&parse_scalar_option,
'update_contract_balance_nonzero' => \&old_scalar_option,
'update-contract-balance-nonzero' => \&parse_scalar_option,
'force_unrated' => \&old_scalar_option,
'force-unrated' => \&parse_scalar_option,
'no_empty' => \&old_scalar_option,
'no-empty' => \&parse_scalar_option,
'enable',
'help|?',

Loading…
Cancel
Save