- perl -pi -e 's!hard drive!hard disk drive!'

1 files changed, 2 insertions, 2 deletions

diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm
index 3bca46d89..ee801fc79 100644
--- a/perl-install/partition_table.pm
+++ b/perl-install/partition_table.pm
@@ -18,7 +18,7 @@ sub hd2minimal_part {
     };
 }
 
-#- works for both hard drives and partitions ;p
+#- works for both hard disk drives and partitions ;p
 sub description {
     my ($hd) = @_;
     my $win = $hd->{device_windobe};
@@ -472,7 +472,7 @@ sub active {
 }
 
 
-# remove a normal partition from hard drive hd
+# remove a normal partition from hard disk drive hd
 sub remove {
     my ($hd, $part) = @_;
     my $i;