diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2005-06-03 08:12:49 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2005-06-03 08:12:49 +0000 |
| commit | 063ce941a2ca90d27ae5b6ce80f504dd430b9b04 (patch) | |
| tree | ab87b72fa659a7d397003a5834fa824ca3dacc7d /perl-install | |
| parent | b4a7f6ec4fe6a0cc3797f531b46fd1a82cfb5399 (diff) | |
| download | drakx-063ce941a2ca90d27ae5b6ce80f504dd430b9b04.tar drakx-063ce941a2ca90d27ae5b6ce80f504dd430b9b04.tar.gz drakx-063ce941a2ca90d27ae5b6ce80f504dd430b9b04.tar.bz2 drakx-063ce941a2ca90d27ae5b6ce80f504dd430b9b04.tar.xz drakx-063ce941a2ca90d27ae5b6ce80f504dd430b9b04.zip | |
remove unused isPrimary
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/diskdrake/interactive.pm | 1 | ||||
| -rw-r--r-- | perl-install/partition_table.pm | 6 |
2 files changed, 0 insertions, 7 deletions
diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm index fb757c6f3..bb414f451 100644 --- a/perl-install/diskdrake/interactive.pm +++ b/perl-install/diskdrake/interactive.pm @@ -460,7 +460,6 @@ sub part_possible_actions { my %macros = ( readonly => '$hd->{readonly}', hasMntpoint => '$part->{mntpoint}', - isPrimary => 'isPrimary($part, $hd)', LVM_resizable => '$part->{fs_type} eq "reiserfs" || (isMounted ? $part->{fs_type} eq "xfs" : $part->{fs_type} eq "ext3")', canModifyRAID => 'isPartOfRAID($part) && !isMounted(fs::get::device2part($part->{raid}, $all_hds->{raids}))', ); diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm index f6fe086c0..b80707927 100644 --- a/perl-install/partition_table.pm +++ b/perl-install/partition_table.pm @@ -34,12 +34,6 @@ sub description { $hd->{info}, $hd->{mntpoint}, $hd->{fs_type}); } -sub isPrimary { - my ($part, $hd) = @_; - foreach (@{$hd->{primary}{raw}}) { $part eq $_ and return 1 } - 0; -} - sub adjustStartAndEnd { my ($hd, $part) = @_; |