WIP: shortcut

Only build updated kernel pkgs for faster kernel ophan testing

1 files changed, 5 insertions, 1 deletions

diff --git a/t/02create_pkgs.t b/t/02create_pkgs.t
index 7bd625f3..315c03fd 100644
--- a/t/02create_pkgs.t
+++ b/t/02create_pkgs.t
@@ -9,6 +9,8 @@ use Cwd;
 
 set_path();
 
+my $shortcut = 1;
+
 # fix bundled genhdlist2 & co to use the right perl on CPAN smokers:
 system($^X, '-pi', '-e', qq(s@^#!/usr/bin/perl.*@#!$^X@), $_) foreach qw(gendistrib genhdlist2);
 
@@ -40,12 +42,14 @@ is($first, "Usage:", "genhdlist2 --help works");
 
 # locally build test rpms
 
-foreach my $dir (grep { -d $_ } glob("data/SPECS/*")) {
+foreach my $dir (grep { -d $_ } glob("data/SPECS/kernel*")) {
     my ($medium_name) = $dir =~ m!([^/]*)$!;
     next if $medium_name eq 'suggests' && !are_weak_deps_supported();
+    next if $shortcut && -d "media/$medium_name";
     rpmbuild($_, $medium_name) foreach glob("$dir/*.spec");
     genhdlist_std($medium_name);
 }
+exit 0;
 
 foreach my $spec (glob("data/SPECS/*.spec")) {
     warn "SKIPPING /rpm-query-in-scriptlet/" if $spec =~ /rpm-query-in-scriptlet/ && $is_bsd;