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
27
lib/Devscripts/Salsa/protected_branches.pm
Normal file
27
lib/Devscripts/Salsa/protected_branches.pm
Normal file
|
@ -0,0 +1,27 @@
|
|||
# Displays protected branches of a project
|
||||
package Devscripts::Salsa::protected_branches;
|
||||
|
||||
use strict;
|
||||
use Devscripts::Output;
|
||||
use Moo::Role;
|
||||
|
||||
sub protected_branches {
|
||||
my ($self, $reponame) = @_;
|
||||
unless ($reponame) {
|
||||
ds_warn "Project name is missing";
|
||||
return 1;
|
||||
}
|
||||
my $branches
|
||||
= $self->api->protected_branches($self->project2id($reponame));
|
||||
if ($branches and @$branches) {
|
||||
printf " %-20s | %-25s | %-25s\n", 'Branch', 'Merge', 'Push';
|
||||
foreach (@$branches) {
|
||||
printf " %-20s | %-25s | %-25s\n", $_->{name},
|
||||
$_->{merge_access_levels}->[0]->{access_level_description},
|
||||
$_->{push_access_levels}->[0]->{access_level_description};
|
||||
}
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
1;
|
Loading…
Add table
Add a link
Reference in a new issue