diff options
Diffstat (limited to 'rescue/make_rescue_img')
| -rwxr-xr-x | rescue/make_rescue_img | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rescue/make_rescue_img b/rescue/make_rescue_img index 44766f318..df4cbca15 100755 --- a/rescue/make_rescue_img +++ b/rescue/make_rescue_img @@ -54,8 +54,8 @@ foreach (keyboard::loadkeys_files) { } unlink "$tmp/usr/lib/kbd/keymaps/i386/qwertz/fr.kmap.gz"; - -@files = map { chomp; $_ } (cat_("list"), cat_(`../tools/specific_arch list`)); +my $perl_version = join ".", unpack "C3", $^V; +@files = map { chomp; s/PERL_VERSION/$perl_version/g; $_ } (cat_("list"), cat_(`../tools/specific_arch list`)); `ls @files`; $? == 0 or exit 1; |