From a655b0e1e07efb3fd057f726b85887908d970ba6 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 10 Jun 2005 07:38:18 +0000 Subject: - move functions using /proc/partitions out of fsedit to fs::proc_partitions - remove unneeded "use xxx" - add some "use xxx" (nb: not completly needed because some other modules may do it) --- perl-install/bootloader.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install/bootloader.pm') diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 0d886f4cb..27a129fac 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -7,13 +7,13 @@ use strict; #- misc imports #-###################################################################################### use common; -use partition_table; use fs::type; use fs::get; +use fs::loopback; +use fs::proc_partitions; use log; use any; use devices; -use fs::loopback; use detect_devices; use partition_table::raw; use run_program; @@ -255,7 +255,7 @@ sub read_grub { sub yaboot2dev { my ($of_path) = @_; - find { dev2yaboot($_) eq $of_path } map { "/dev/$_->{dev}" } devices::read_proc_partitions_raw(); + find { dev2yaboot($_) eq $of_path } map { "/dev/$_->{dev}" } fs::proc_partitions::read_raw(); } # assumes file is in /boot -- cgit v1.2.1