From 967d8ec6e7be57b1cdfc4ff1538044bc07b4db53 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 13 Jun 2005 04:33:50 +0000 Subject: move functions using /proc/partitions out of fsedit to fs::proc_partitions --- rescue/lsparts | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'rescue/lsparts') diff --git a/rescue/lsparts b/rescue/lsparts index 8dff460d2..9f0fac925 100755 --- a/rescue/lsparts +++ b/rescue/lsparts @@ -18,8 +18,8 @@ use lib qw(../perl-install /usr/lib/libDrakX); use common; -use devices; use fs::type; +use fs::proc_partitions; my $params = join '', @ARGV; my $verbose = $params =~ /-v/; @@ -27,7 +27,7 @@ my $verbose = $params =~ /-v/; $params =~ /-h/ and die "usage: lsparts [-v]\n"; -foreach (devices::read_proc_partitions_raw()) { +foreach (fs::proc_partitions::read_raw()) { if (my $err = $_->{size} <= 1 ? "Skipping <$_->{dev}> because too little blocks ($_->{size})" : $_->{dev} !~ /\d$/ ? -- cgit v1.2.1