From cd57e576b1ad28f3a0b25104ab53144165620024 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Mon, 3 Sep 2007 08:41:27 +0000 Subject: simplify --- draklive | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/draklive b/draklive index 7031656..79f25b7 100755 --- a/draklive +++ b/draklive @@ -374,7 +374,7 @@ sub find_kernel { unless ($kernel) { my $vmlinuz = readlink(get_system_root($live) . '/boot/vmlinuz'); $vmlinuz ||= find { -e $_ } glob_(get_system_root($live) . '/boot/vmlinuz-*'); - $kernel = first($vmlinuz =~ /\bvmlinuz-(.*)$/) or die "no kernel can be found"; + ($kernel) = $vmlinuz =~ /\bvmlinuz-(.*)$/ or die "no kernel can be found"; } $kernel; } -- cgit v1.2.1