mirror of
https://github.com/speed47/btrfs-list
synced 2024-09-30 04:43:31 +00:00
fix: -f with multiple filesystems
This commit is contained in:
parent
317becb513
commit
8fbe5b8513
|
@ -455,7 +455,7 @@ foreach my $fuuid (keys %filesystems) {
|
|||
}
|
||||
}
|
||||
|
||||
goto FREE_SPACE_ONLY if $opt_free_space;
|
||||
next if $opt_free_space;
|
||||
|
||||
# cvol btrfs sub list
|
||||
$cmd = run_cmd(silent_stderr => 1, cmd => [qw{ btrfs subvolume list -pacguq }, $mp]);
|
||||
|
@ -536,6 +536,7 @@ foreach my $fuuid (keys %filesystems) {
|
|||
my $mp = $filesystems{$fuuid}{'mountpoint'};
|
||||
defined $mp or next;
|
||||
-d $mp or next;
|
||||
next if $opt_free_space;
|
||||
|
||||
$cmd = run_cmd(silent_stderr => 1, cmd => [qw{ btrfs quota rescan -s }, $mp]);
|
||||
if ($cmd->{stdout}->[0] && $cmd->{stdout}->[0] =~ /operation running|current key/) {
|
||||
|
@ -627,7 +628,6 @@ sub dothemagic {
|
|||
}
|
||||
}
|
||||
|
||||
FREE_SPACE_ONLY:
|
||||
my $isFirstFS = 1;
|
||||
foreach my $fuuid (sort keys %filesystems) {
|
||||
@ordered = ();
|
||||
|
|
Loading…
Reference in a new issue