From e842236c2abecc1bdb069a9fa9e96fe89849e36c Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 3 Jun 2005 07:05:35 +0000 Subject: drop old unused code --- perl-install/diskdrake/interactive.pm | 4 ---- 1 file changed, 4 deletions(-) (limited to 'perl-install/diskdrake') diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm index 404dd9c79..fb757c6f3 100644 --- a/perl-install/diskdrake/interactive.pm +++ b/perl-install/diskdrake/interactive.pm @@ -1105,10 +1105,6 @@ sub write_partitions { 1; } -sub unmount { - my ($_hd, $part) = @_; - fs::umount_part($part); -} sub format_ { my ($in, $hd, $part, $all_hds) = @_; write_partitions($in, $_) or return foreach isRAID($part) ? @{$all_hds->{hds}} : $hd; -- cgit v1.2.1