summaryrefslogtreecommitdiffstats
path: root/perl-install/partition_table
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/partition_table')
-rw-r--r--perl-install/partition_table/bsd.pm2
-rw-r--r--perl-install/partition_table/dos.pm2
-rw-r--r--perl-install/partition_table/empty.pm2
-rw-r--r--perl-install/partition_table/gpt.pm2
-rw-r--r--perl-install/partition_table/mac.pm2
-rw-r--r--perl-install/partition_table/sun.pm2
6 files changed, 6 insertions, 6 deletions
diff --git a/perl-install/partition_table/bsd.pm b/perl-install/partition_table/bsd.pm
index d01f0ad7e..9421eae17 100644
--- a/perl-install/partition_table/bsd.pm
+++ b/perl-install/partition_table/bsd.pm
@@ -61,7 +61,7 @@ my $offset = 0x40;
sub use_pt_type { 1 }
-sub read($$) {
+sub read_one {
my ($hd, $sector) = @_;
my $tmp;
diff --git a/perl-install/partition_table/dos.pm b/perl-install/partition_table/dos.pm
index 688626d7b..c12b7cba4 100644
--- a/perl-install/partition_table/dos.pm
+++ b/perl-install/partition_table/dos.pm
@@ -197,7 +197,7 @@ sub set_best_geometry_for_the_partition_table {
}
}
-sub read {
+sub read_one {
my ($hd, $sector) = @_;
my $tmp;
diff --git a/perl-install/partition_table/empty.pm b/perl-install/partition_table/empty.pm
index b34b9210c..e5d3c5685 100644
--- a/perl-install/partition_table/empty.pm
+++ b/perl-install/partition_table/empty.pm
@@ -17,7 +17,7 @@ use partition_table;
use c;
-sub read($$) {
+sub read_one {
my ($hd, $sector) = @_;
my $tmp;
diff --git a/perl-install/partition_table/gpt.pm b/perl-install/partition_table/gpt.pm
index ba9307df3..81967d07e 100644
--- a/perl-install/partition_table/gpt.pm
+++ b/perl-install/partition_table/gpt.pm
@@ -138,7 +138,7 @@ sub read_partitionEntries {
\@pt;
}
-sub read {
+sub read_one {
my ($hd, $sector) = @_;
my $l = partition_table::dos::read($hd, $sector);
diff --git a/perl-install/partition_table/mac.pm b/perl-install/partition_table/mac.pm
index 779799188..2922bc7a3 100644
--- a/perl-install/partition_table/mac.pm
+++ b/perl-install/partition_table/mac.pm
@@ -98,7 +98,7 @@ sub adjustEnd($$) {
my ($_hd, $_part) = @_;
}
-sub read($$) {
+sub read_one {
my ($hd, $sector) = @_;
my $tmp;
diff --git a/perl-install/partition_table/sun.pm b/perl-install/partition_table/sun.pm
index d5d29e27b..1532c04a9 100644
--- a/perl-install/partition_table/sun.pm
+++ b/perl-install/partition_table/sun.pm
@@ -73,7 +73,7 @@ sub compute_crc($) {
$crc;
}
-sub read($$) {
+sub read_one {
my ($hd, $sector) = @_;
my $tmp;