-
-my %bugusertags;
-my %ut;
-my %seen_users;
-
-for my $user (map {split /[\s*,\s*]+/} make_list($param{users}||[])) {
- next unless length($user);
- add_user($user,\%ut,\%bugusertags,\%seen_users);
-}
-
-if (defined $param{usertag}) {
- for my $usertag (make_list($param{usertag})) {
- my %select_ut = ();
- my ($u, $t) = split /:/, $usertag, 2;
- Debbugs::User::read_usertags(\%select_ut, $u);
- unless (defined $t && $t ne "") {
- $t = join(",", keys(%select_ut));
- }
- add_user($u,\%ut,\%bugusertags,\%seen_users);
- push @{$param{tag}}, split /,/, $t;
- }
-}
-