From 5e911a37d0470f3b6f9dbbdcfabb457be4e84510 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Mon, 3 Sep 2007 08:42:38 +0000 Subject: don't check symlinks when looking for kernels (fix matching vmlinuz-tmb-desktop586) --- draklive | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/draklive b/draklive index 79f25b7..54dac36 100755 --- a/draklive +++ b/draklive @@ -373,7 +373,7 @@ sub find_kernel { my $kernel = $live->{system}{kernel}; unless ($kernel) { my $vmlinuz = readlink(get_system_root($live) . '/boot/vmlinuz'); - $vmlinuz ||= find { -e $_ } glob_(get_system_root($live) . '/boot/vmlinuz-*'); + $vmlinuz ||= find { -e $_ && ! -l $_ } glob_(get_system_root($live) . '/boot/vmlinuz-*'); ($kernel) = $vmlinuz =~ /\bvmlinuz-(.*)$/ or die "no kernel can be found"; } $kernel; -- cgit v1.2.1