diff options
Diffstat (limited to 'perl-install/detect_devices.pm')
| -rw-r--r-- | perl-install/detect_devices.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index c8fbc762d..f53f4d750 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -160,8 +160,8 @@ sub isRemovableDrive { &isZipDrive || &isLS120Drive || $_[0]->{media_type} eq 'f sub isFloppyOrHD { my ($dev) = @_; - require partition_table_raw; - my $geom = partition_table_raw::get_geometry(devices::make($dev)); + require partition_table::raw; + my $geom = partition_table::raw::get_geometry(devices::make($dev)); $geom->{totalsectors} < 10 << 11 ? 'fd' : 'hd'; } |