summaryrefslogtreecommitdiffstats
path: root/rescue/make_rescue_img
diff options
context:
space:
mode:
Diffstat (limited to 'rescue/make_rescue_img')
-rwxr-xr-xrescue/make_rescue_img14
1 files changed, 10 insertions, 4 deletions
diff --git a/rescue/make_rescue_img b/rescue/make_rescue_img
index 8afbb4d4e..9c7352338 100755
--- a/rescue/make_rescue_img
+++ b/rescue/make_rescue_img
@@ -74,10 +74,16 @@ foreach (keyboard::loadkeys_files()) {
}
my $perl_version = join ".", unpack "C3", $^V;
-@files = map { chomp; s/PERL_VERSION/$perl_version/g; s|/LIB/|/$lib/|g; $_ } (cat_("list"), cat_(`../tools/specific_arch list`));
-@files = `ls -d @files`;
-$? == 0 or exit 1;
-
+my @bad;
+@files = map {
+ chomp;
+ s/PERL_VERSION/$perl_version/g;
+ s|/LIB/|/$lib/|g;
+ my @l = glob($_) or push @bad, $_;
+ m|\*.*/| && @l != 1 and die "multiple match for $_\n";
+ @l;
+} (cat_("list"), cat_(`../tools/specific_arch list`));
+@bad and die "files missing\n" . join("\n", @bad) . "\n";
install_l(@files);
foreach (cat_("aliases")) {