diff options
-rw-r--r-- | lib/MDV/Draklive/Initrd.pm | 4 | ||||
-rw-r--r-- | lib/MDV/Draklive/Live.pm | 5 |
2 files changed, 7 insertions, 2 deletions
diff --git a/lib/MDV/Draklive/Initrd.pm b/lib/MDV/Draklive/Initrd.pm index adeea0a..b5ea5a7 100644 --- a/lib/MDV/Draklive/Initrd.pm +++ b/lib/MDV/Draklive/Initrd.pm @@ -301,8 +301,8 @@ sub create_classical_initrd { my $kernel = $live->find_kernel; print "using kernel $kernel->{version}\n"; - my $initrd_long = '/boot/initrd-'. $kernel->{version} . '.img'; - unlink($root . $initrd_long); + my $initrd_file = $root . '/boot/' . $live->get_initrd_name; + unlink($initrd_file); { my $bootloader = {}; diff --git a/lib/MDV/Draklive/Live.pm b/lib/MDV/Draklive/Live.pm index 49af192..9603879 100644 --- a/lib/MDV/Draklive/Live.pm +++ b/lib/MDV/Draklive/Live.pm @@ -47,6 +47,11 @@ sub find_kernel { $kernel ||= first(@kernels) or die "no kernel can be found\n"; } +sub get_initrd_name { + my ($live) = @_; + 'initrd-'. $live->find_kernel->{version} . '.img'; +} + sub get_lib_prefix { my ($live) = @_; my $lib_prefix = find { glob($live->get_system_root . $_ . '/libc.so.*') } qw(/lib64 /lib); |