if ($preordered_list ne "") {
@preview_orders = split /[:,\s\/]+/, $preordered_list;
- info("Preordered list given");
}
my $preview_command = "";
if ($profiling_reference ne "") {
- info("Profiling reference given");
- $preview_command = "bsr reorder -j $profiling_reference --verbose ";
+ $preview_command = "bsr reorder -j $profiling_reference ";
} elsif (@preview_orders <= 0) {
- info("Order list is empty.. Start call bsr");
generate_depends_xmlfile();
my $dep_xml_file = "$depends_dir/$dist/$arch/$dist\_$arch\_pkgdepends.xml";
- info("Depend finished...");
if (-e $dep_xml_file) {
- info("Dep file found...");
- $preview_command = "bsr preview -a $arch --verbose --depsnumbersort ";
+ $preview_command = "bsr preview -a $arch --depsnumbersort ";
$preview_command = $preview_command . " -x \"$dep_xml_file\" ";
my $candidate_ref = "";
foreach my $r (@package_repos) {
$preview_command = $preview_command . " -r \"$candidate_ref\" --criticalsort ";
}
}
+ } else {
+ $preview_command = "bsr reorder -j non/exists/path ";
}
if ($preview_command ne "") {
my_system($preview_command);
- info("");
- info($preview_command);
- info("");
-
my $preview_config = "";
if (-f ".bsr.preview.yaml") {
$preview_config = LoadFile(".bsr.preview.yaml");
&& $preview_config->{preview}
&& $preview_config->{preview}->{packages}
&& @{$preview_config->{preview}->{packages}} > 0) {
-
- info("We have preview orders... " . @{$preview_config->{preview}->{packages}});
-
foreach my $p (@{$preview_config->{preview}->{packages}}) {
if ( !(grep $_ eq $p, @preview_orders) ) {
push @preview_orders, $p;
}
} else {
$preview_config = "";
- info("No .bsr.preview.yaml file found");
}
}