diff options
| author | Stew Benedict <stewb@mandriva.org> | 2001-04-04 15:41:03 +0000 |
|---|---|---|
| committer | Stew Benedict <stewb@mandriva.org> | 2001-04-04 15:41:03 +0000 |
| commit | b03b5236519fdef9722188318f639166e78a0043 (patch) | |
| tree | 5e2e36c5775769f774e0c3cadef2e4c3f254c0ec /perl-install | |
| parent | e5f3404981994a9d4b1862291ffc99f019477f55 (diff) | |
| download | drakx-b03b5236519fdef9722188318f639166e78a0043.tar drakx-b03b5236519fdef9722188318f639166e78a0043.tar.gz drakx-b03b5236519fdef9722188318f639166e78a0043.tar.bz2 drakx-b03b5236519fdef9722188318f639166e78a0043.tar.xz drakx-b03b5236519fdef9722188318f639166e78a0043.zip | |
kernelVersion mods for PPC
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_any.pm | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index ddcdd9a27..67d2a2dc5 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -197,10 +197,16 @@ sub clean_postinstall_rpms() { #-###################################################################################### sub kernelVersion { my ($o) = @_; - local $_ = readlink("$::o->{prefix}/boot/vmlinuz") and return first(/vmlinuz-(.*mdk)/); + if(arch() !~ /ppc/) { + local $_ = readlink("$::o->{prefix}/boot/vmlinuz") and return first(/vmlinuz-(.*mdk)/); + } else { + local $_ = readlink("$::o->{prefix}/boot/vmlinux") and return first(/vmlinux-(.*mdk)/); + } require pkgs; - my $p = pkgs::packageByName($o->{packages}, "kernel") or die "I couldn't find the kernel package!"; + my $kpkgname = "kernel"; + $kpkgname = "kernel22" if arch() =~ /ppc/; #- still using 2.2 for PPC + my $p = pkgs::packageByName($o->{packages}, "$kpkgname") or die "I couldn't find the kernel package!"; pkgs::packageVersion($p) . "-" . pkgs::packageRelease($p); } |