From 9fd53f54fa7ff9cdf7f8525a46eddbabd80c5b10 Mon Sep 17 00:00:00 2001 From: Maarten Vanraes Date: Sat, 6 Aug 2016 14:36:56 +0200 Subject: Part: allow to extend auto-reversible tags --- lib/ManaTools/Shared/disk_backend/Plugin/Btrfs.pm | 10 ++++++++++ 1 file changed, 10 insertions(+) (limited to 'lib/ManaTools/Shared/disk_backend/Plugin/Btrfs.pm') diff --git a/lib/ManaTools/Shared/disk_backend/Plugin/Btrfs.pm b/lib/ManaTools/Shared/disk_backend/Plugin/Btrfs.pm index 9ee2a06e..0683f669 100644 --- a/lib/ManaTools/Shared/disk_backend/Plugin/Btrfs.pm +++ b/lib/ManaTools/Shared/disk_backend/Plugin/Btrfs.pm @@ -303,6 +303,16 @@ class_has '+restrictions' => ( } ); +augment('_reverse_tag', sub { + my $self = shift; + my $tag = shift; + my $rtag = inner($tag); + return $rtag if (defined($rtag) && $tag ne $rtag); + return 'childsubvol' if ($tag eq 'parentsubvol'); + return 'parentsubvol' if ($tag eq 'childsubvol'); + return $tag; +}); + around('find_path', sub { my $orig = shift; my $self = shift; -- cgit v1.2.1