gistfile1.txt

sub suggest_users {
    my ($self, $text) = @_;
    my $field = 'suggest_user';
    if ($text =~ /^:(.+)$/) {
        $text = $1;
        $field = 'suggest_nick';
    }
 
    my $result = eval {
        $self->client->suggest(
            index => $self->index_name,
            body  => {
                $field => {
                    text       => $text,
                    completion => { field => $field, size => 25 },
                }
            }
        );
    };
    if (defined $result) {
        return [ map { $_->{payload} } @{$result->{$field}[0]{options}} ];
    }
    else {
        warn "suggest_users error: $@";
        my $users = Bugzilla::User::match($text, 25, 0);
        return [ map { { real_name => $_->name, name => $_->login } } @$users];
    }
}