diff options
Diffstat (limited to 'scripts/user-prefs.pl')
-rwxr-xr-x | scripts/user-prefs.pl | 60 |
1 files changed, 34 insertions, 26 deletions
diff --git a/scripts/user-prefs.pl b/scripts/user-prefs.pl index dc44c5aea..f63eaf3d5 100755 --- a/scripts/user-prefs.pl +++ b/scripts/user-prefs.pl @@ -20,36 +20,44 @@ Bugzilla->usage_mode(USAGE_MODE_CMDLINE); my ($login, $action, $param, $value) = @ARGV; ($login && $action && $action =~ /^(get|set)$/) - or die "syntax: $0 <bugzilla-login> <get|set> [param] [value]\n"; + or die "syntax: $0 <bugzilla-login> <get|set> [param] [value]\n"; -my $user = Bugzilla::User->check({ name => $login }); +my $user = Bugzilla::User->check({name => $login}); my $settings = $user->settings; if ($action eq 'get') { - if ($param eq '') { - foreach my $name (sort keys %$settings) { - printf "%s=%s\n", $name, $settings->{$name}->{value}; - } - } elsif (exists $settings->{$param}) { - say $settings->{$param}->{value}; - } else { - die "Invalid parameter name: $param\n"; + if ($param eq '') { + foreach my $name (sort keys %$settings) { + printf "%s=%s\n", $name, $settings->{$name}->{value}; } -} else { - if ($param eq '') { - die "Parameter name required\n"; - } elsif (!exists $settings->{$param}) { - die "Invalid parameter name: $param\n"; - } elsif (!defined($value) || $value eq '') { - die "Missing parameter value\n"; - } else { - my $setting = $settings->{$param}; - # not using validate_value here so we can print out a list of the legal values - my $legal_values = $setting->legal_values; - if (! grep { $value eq $_ } @$legal_values) { - die "Invalid value '$value' for param $param.\nAccepted values: " . join(' ', @$legal_values) . "\n"; - } - $setting->set($value); - say "'$param' set to '$value'"; + } + elsif (exists $settings->{$param}) { + say $settings->{$param}->{value}; + } + else { + die "Invalid parameter name: $param\n"; + } +} +else { + if ($param eq '') { + die "Parameter name required\n"; + } + elsif (!exists $settings->{$param}) { + die "Invalid parameter name: $param\n"; + } + elsif (!defined($value) || $value eq '') { + die "Missing parameter value\n"; + } + else { + my $setting = $settings->{$param}; + + # not using validate_value here so we can print out a list of the legal values + my $legal_values = $setting->legal_values; + if (!grep { $value eq $_ } @$legal_values) { + die "Invalid value '$value' for param $param.\nAccepted values: " + . join(' ', @$legal_values) . "\n"; } + $setting->set($value); + say "'$param' set to '$value'"; + } } |