Commit bf21211c authored by Andreas Kusalananda Kähäri's avatar Andreas Kusalananda Kähäri
Browse files

Swap arguments for set_release() method (more logical).

Beautify summary output somewhat.
parent 5ecba082
......@@ -353,7 +353,7 @@ sub run
# Set release if specified
if ( defined $release ) {
$self->set_release( $release, $source_id );
$self->set_release( $source_id, $release );
}
unlink("$dir/$new_file[0]") if ($cleanup);
......@@ -365,20 +365,20 @@ sub run
. "' as checksums match\n";
}
}
print "---------------------------------------------------------\n";
print "Summary of status\n";
print "---------------------------------------------------------\n";
foreach my $key (keys %summary){
print $key."\t";
if($summary{$key}){
print "FAILED\n";
}
else{
print "OKAY\n";
}
}
print "\n", '=' x 80, "\n";
print "Summary of status\n";
print '=' x 80, "\n";
foreach my $key ( keys %summary ) {
printf(
"%30s\t%s\n",
$key,
(
defined $summary{$key}
&& $summary{$key} ? 'FAILED' : 'OKAY'
)
);
}
# remove last working directory
# TODO reinstate after debugging
......@@ -1481,7 +1481,7 @@ sub get_sub_list{
sub set_release
{
my $self = shift;
my ( $release, $source_id ) = @_;
my ( $source_id, $release ) = @_;
my $dbi = dbi();
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment