summaryrefslogtreecommitdiffstats
path: root/perl-install/diskdrake/removable.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/diskdrake/removable.pm')
-rw-r--r--perl-install/diskdrake/removable.pm7
1 files changed, 3 insertions, 4 deletions
diff --git a/perl-install/diskdrake/removable.pm b/perl-install/diskdrake/removable.pm
index 905f6a2c4..14eb26772 100644
--- a/perl-install/diskdrake/removable.pm
+++ b/perl-install/diskdrake/removable.pm
@@ -4,7 +4,6 @@ use diagnostics;
use strict;
use diskdrake::interactive;
use common;
-use fsedit;
use fs;
sub main {
@@ -43,11 +42,11 @@ sub mount_point {
sub type {
my ($in, $raw_hd) = @_;
my @fs = ('auto', fs::auto_fs());
- my $pt_type = $raw_hd->{pt_type};
+ my $fs_type = $raw_hd->{fs_type};
$in->ask_from(N("Change type"),
N("Which filesystem do you want?"),
- [ { label => N("Type"), val => \$pt_type, list => [@fs], not_edit => !$::expert } ]) or return;
- $raw_hd->{pt_type} = $pt_type;
+ [ { label => N("Type"), val => \$fs_type, list => [@fs], not_edit => !$::expert } ]) or return;
+ $raw_hd->{fs_type} = $fs_type;
}
1;