From 38229739b7cee263208d39b2c55b942e4d21c632 Mon Sep 17 00:00:00 2001 From: David Lawrence Date: Tue, 6 Oct 2015 14:37:10 +0800 Subject: Bug 1196620 - support automatic removal of inactive users from groups --- Bugzilla/Group.pm | 12 ++++++++++++ 1 file changed, 12 insertions(+) (limited to 'Bugzilla/Group.pm') diff --git a/Bugzilla/Group.pm b/Bugzilla/Group.pm index 37d4acf90..51d51b2e8 100644 --- a/Bugzilla/Group.pm +++ b/Bugzilla/Group.pm @@ -50,6 +50,7 @@ use constant DB_COLUMNS => qw( groups.isactive groups.icon_url groups.owner_user_id + groups.idle_member_removal ); use constant DB_TABLE => 'groups'; @@ -64,6 +65,7 @@ use constant VALIDATORS => { isbuggroup => \&_check_is_bug_group, icon_url => \&_check_icon_url, owner_user_id => \&_check_owner, + idle_member_removal => \&_check_idle_member_removal }; use constant UPDATE_COLUMNS => qw( @@ -73,6 +75,7 @@ use constant UPDATE_COLUMNS => qw( isactive icon_url owner_user_id + idle_member_removal ); # Parameters that are lists of groups. @@ -88,6 +91,7 @@ sub is_bug_group { return $_[0]->{'isbuggroup'}; } sub user_regexp { return $_[0]->{'userregexp'}; } sub is_active { return $_[0]->{'isactive'}; } sub icon_url { return $_[0]->{'icon_url'}; } +sub idle_member_removal { return $_[0]->{'idle_member_removal'}; } sub bugs { my $self = shift; @@ -240,6 +244,7 @@ sub set_is_active { $_[0]->set('isactive', $_[1]); } sub set_name { $_[0]->set('name', $_[1]); } sub set_user_regexp { $_[0]->set('userregexp', $_[1]); } sub set_icon_url { $_[0]->set('icon_url', $_[1]); } +sub set_idle_member_removal { $_[0]->set('idle_member_removal', $_[1]); } sub set_owner { my ($self, $owner_id) = @_; @@ -550,6 +555,13 @@ sub _check_owner { ThrowUserError('group_needs_owner'); } +sub _check_idle_member_removal { + my ($invocant, $value) = @_; + detaint_natural($value) + || ThrowUserError('invalid_parameter', { name => 'idle member removal', err => 'must be numeric' }); + return $value <= 0 ? 0 : $value ; +} + 1; __END__ -- cgit v1.2.3-24-g4f1b