summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-10-19 11:39:12 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-10-19 11:39:12 +0000
commitd25f08bee430e5418edbdb0405899dce9e3a0590 (patch)
tree5eb147f9da25b757d848a4ff28804dcecb327588 /perl-install
parentdb4d234060d0f6ab18d6252ff1f9bd2329560b72 (diff)
downloaddrakx-d25f08bee430e5418edbdb0405899dce9e3a0590.tar
drakx-d25f08bee430e5418edbdb0405899dce9e3a0590.tar.gz
drakx-d25f08bee430e5418edbdb0405899dce9e3a0590.tar.bz2
drakx-d25f08bee430e5418edbdb0405899dce9e3a0590.tar.xz
drakx-d25f08bee430e5418edbdb0405899dce9e3a0590.zip
OOize can_raw_add
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_interactive.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_interactive.pm b/perl-install/install_interactive.pm
index 997177cce..7b93bbf09 100644
--- a/perl-install/install_interactive.pm
+++ b/perl-install/install_interactive.pm
@@ -71,7 +71,7 @@ sub partitionWizardSolutions {
# each solution is a [ score, text, function ], where the function retunrs true if succeeded
- my @good_hds = grep { partition_table::can_raw_add($_) } @$hds;
+ my @good_hds = grep { $_->can_raw_add } @$hds;
if (fsedit::free_space(@good_hds) > $min_linux and !$readonly) {
$solutions{free_space} = [ 20, _("Use free space"), sub { fsedit::auto_allocate($all_hds); 1 } ]
} else {