enhance mountpoint regexp

This commit is contained in:
garnier-quentin 2020-10-05 12:05:38 +02:00
parent 457d6f5731
commit 6ce596f6d7
1 changed files with 2 additions and 2 deletions

View File

@ -87,8 +87,8 @@ sub manage_selection {
my @lines = split /\n/, $stdout;
foreach my $line (@lines) {
next if ($line !~ /^\s*(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+\((.*)\)/);
my ($device, $mountpoint, $type, $options) = ($1, $3, $5, $6);
next if ($line !~ /^\s*(.*?)\s+on\s+(.*?)\s+type\s+(\S+)\s+\((.*)\)/);
my ($device, $mountpoint, $type, $options) = ($1, $2, $3, $4);
if (defined($self->{option_results}->{filter_type}) && $self->{option_results}->{filter_type} ne '' &&
$type !~ /$self->{option_results}->{filter_type}/) {