diff options
| author | Francois Pons <fpons@mandriva.com> | 2001-06-06 08:40:58 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2001-06-06 08:40:58 +0000 |
| commit | c18e30cd2e1ff5e39a72f080b1c43526ed9d5c1b (patch) | |
| tree | 88c165cdafe8509f214383144572e822aabc0091 /rescue/make_rescue_img | |
| parent | a6a0844f535a158c60c547b982971afb38c35b5b (diff) | |
| download | drakx-backup-do-not-use-c18e30cd2e1ff5e39a72f080b1c43526ed9d5c1b.tar drakx-backup-do-not-use-c18e30cd2e1ff5e39a72f080b1c43526ed9d5c1b.tar.gz drakx-backup-do-not-use-c18e30cd2e1ff5e39a72f080b1c43526ed9d5c1b.tar.bz2 drakx-backup-do-not-use-c18e30cd2e1ff5e39a72f080b1c43526ed9d5c1b.tar.xz drakx-backup-do-not-use-c18e30cd2e1ff5e39a72f080b1c43526ed9d5c1b.zip | |
Avoid hard coded perl version in list files, use PERL_VERSION magic
string instead.
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; |