diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2000-04-18 14:38:41 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2000-04-18 14:38:41 +0000 |
commit | 55d44a1b5c6e4d2f45d365fe7680aa619c831506 (patch) | |
tree | 79acc6af53dc612896b99f3e218569c5ca9892f6 /perl-install/commands.pm | |
parent | 9e8dbe6e3b60bfd65346d5fa6c11b4723599aebb (diff) | |
download | drakx-backup-do-not-use-55d44a1b5c6e4d2f45d365fe7680aa619c831506.tar drakx-backup-do-not-use-55d44a1b5c6e4d2f45d365fe7680aa619c831506.tar.gz drakx-backup-do-not-use-55d44a1b5c6e4d2f45d365fe7680aa619c831506.tar.bz2 drakx-backup-do-not-use-55d44a1b5c6e4d2f45d365fe7680aa619c831506.tar.xz drakx-backup-do-not-use-55d44a1b5c6e4d2f45d365fe7680aa619c831506.zip |
no_comment
Diffstat (limited to 'perl-install/commands.pm')
-rw-r--r-- | perl-install/commands.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/commands.pm b/perl-install/commands.pm index c7f75a447..09f7ecd97 100644 --- a/perl-install/commands.pm +++ b/perl-install/commands.pm @@ -423,8 +423,9 @@ sub insmod { $_ = $1 if m@.*/([^/]*)\.o@; unless (-r ($f = "/lib/modules/$_.o")) { $f = "/tmp/$_.o"; - if (-e "/lib/modules.cz2") { - run_program::run("extract_archive /lib/modules.cz2 /tmp $_.o"); + my $cz = "/lib/modules.cz"; -e $cz or $cz .= "2"; + if (-e $cz) { + run_program::run("extract_archive $cz /tmp $_.o"); } elsif (-e "/lib/modules.cpio.bz2") { run_program::run("cd /tmp ; bzip2 -cd /lib/modules.cpio.bz2 | cpio -i $_.o"); } else { |