diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2001-04-05 15:08:53 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2001-04-05 15:08:53 +0000 |
| commit | f6131777949414385eddec3b956ea80c5a41db20 (patch) | |
| tree | 10b6ac7d44ebff215bd37d81965fb8a52dfb469f /perl-install | |
| parent | 72cd0db169f952f510435f27b8b37982fdad1948 (diff) | |
| download | drakx-f6131777949414385eddec3b956ea80c5a41db20.tar drakx-f6131777949414385eddec3b956ea80c5a41db20.tar.gz drakx-f6131777949414385eddec3b956ea80c5a41db20.tar.bz2 drakx-f6131777949414385eddec3b956ea80c5a41db20.tar.xz drakx-f6131777949414385eddec3b956ea80c5a41db20.zip | |
(kernelVersion): fix enormous stupid typo
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_any.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index e87116a3e..04faa525d 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -200,7 +200,7 @@ sub kernelVersion { if (my $link = (arch() !~ /ppc/) ? readlink("$o->{prefix}/boot/vmlinuz") : readlink("$o->{prefix}/boot/vmlinux")) { - $link =~ first(/-(.*mdk)/); + first($link =~ /-(.*mdk)/); } else { require pkgs; my $p = pkgs::packageByName($o->{packages}, "kernel"); |