From fb13c58c512259986a7b96f415d0b29e3250bace Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 31 Jul 2007 09:50:26 +0000 Subject: rescuept is no more in util-linux, so - diskdrake: drop "Rescue partition table" feature (was based on rescuept which has been dropped in util-linux, but was quite bad compared to testdisk anyway) - rescue: remove rescuept (use testdisk instead, which is much nicer) --- perl-install/diskdrake/interactive.pm | 7 ------- 1 file changed, 7 deletions(-) (limited to 'perl-install/diskdrake/interactive.pm') diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm index 906fda5f8..7e08981e0 100644 --- a/perl-install/diskdrake/interactive.pm +++ b/perl-install/diskdrake/interactive.pm @@ -361,7 +361,6 @@ sub More { [ { val => N("Save partition table"), clicked_may_quit => sub { SaveInFile($in, $hd); 1 } }, { val => N("Restore partition table"), clicked_may_quit => sub { ReadFromFile($in, $hd); 1 } }, - { val => N("Rescue partition table"), clicked_may_quit => sub { Rescuept($in, $hd); 1 } }, if_($::isInstall, { val => N("Reload partition table"), clicked_may_quit => sub { $r = 'force_reload'; 1 } }), if_($::isInstall || 1, @@ -417,12 +416,6 @@ sub SaveInFile { } } -sub Rescuept { - my ($in, $hd) = @_; - my $_w = $in->wait_message(N("Please wait"), N("Trying to rescue partition table")); - fsedit::rescuept($hd); -} - sub Hd_info { my ($in, $hd) = @_; $in->ask_warn(N("Warning"), [ N("Detailed information"), format_hd_info($hd) ]); -- cgit v1.2.1