Adding upstream version 2.25.15.
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
This commit is contained in:
parent
10737b110a
commit
b543f2e88d
485 changed files with 191459 additions and 0 deletions
57
lib/Devscripts/Salsa/search_project.pm
Normal file
57
lib/Devscripts/Salsa/search_project.pm
Normal file
|
@ -0,0 +1,57 @@
|
|||
# Searches projects using given string
|
||||
package Devscripts::Salsa::search_project; # search_projects
|
||||
|
||||
use strict;
|
||||
use Devscripts::Output;
|
||||
use Moo::Role;
|
||||
|
||||
sub search_project {
|
||||
my ($self, $project) = @_;
|
||||
unless ($project) {
|
||||
ds_warn "Searched string is missing";
|
||||
return 1;
|
||||
}
|
||||
my $projects = $self->api->project($project);
|
||||
if ($projects) {
|
||||
$projects = [$projects];
|
||||
} else {
|
||||
$projects = $self->api->paginator(
|
||||
'projects',
|
||||
{
|
||||
search => $project,
|
||||
order_by => 'name',
|
||||
archived => $self->config->archived
|
||||
})->all();
|
||||
}
|
||||
unless ($projects and @$projects) {
|
||||
ds_warn "No projects found";
|
||||
return 1;
|
||||
}
|
||||
foreach (@$projects) {
|
||||
print <<END;
|
||||
Id : $_->{id}
|
||||
Name : $_->{name}
|
||||
Full path: $_->{path_with_namespace}
|
||||
END
|
||||
print(
|
||||
$_->{namespace}->{kind} eq 'group'
|
||||
? "Group id : "
|
||||
: "User id : "
|
||||
);
|
||||
print "$_->{namespace}->{id}\n";
|
||||
print(
|
||||
$_->{namespace}->{kind} eq 'group'
|
||||
? "Group : "
|
||||
: "User : "
|
||||
);
|
||||
print "$_->{namespace}->{name}\n";
|
||||
if ($_->{forked_from_project} and $_->{forked_from_project}->{id}) {
|
||||
print
|
||||
"Fork of : $_->{forked_from_project}->{name_with_namespace}\n";
|
||||
}
|
||||
print "\n";
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
1;
|
Loading…
Add table
Add a link
Reference in a new issue