diff options
author | Maarten Vanraes <alien@mageia.org> | 2016-02-26 22:40:32 +0100 |
---|---|---|
committer | Maarten Vanraes <alien@mageia.org> | 2016-05-14 09:25:24 +0200 |
commit | d9b9616a05b26f4489711e3af6ffc3bc0bac7c76 (patch) | |
tree | 5c15ecf41afddcd1e821a5ebab70daf8f0472af9 | |
parent | 7ebd42f91c04e619a3c7ab33f87632425722b8f4 (diff) | |
download | manatools-d9b9616a05b26f4489711e3af6ffc3bc0bac7c76.tar manatools-d9b9616a05b26f4489711e3af6ffc3bc0bac7c76.tar.gz manatools-d9b9616a05b26f4489711e3af6ffc3bc0bac7c76.tar.bz2 manatools-d9b9616a05b26f4489711e3af6ffc3bc0bac7c76.tar.xz manatools-d9b9616a05b26f4489711e3af6ffc3bc0bac7c76.zip |
Part: add is_equal helper function
-rw-r--r-- | lib/ManaTools/Shared/disk_backend/Part.pm | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/lib/ManaTools/Shared/disk_backend/Part.pm b/lib/ManaTools/Shared/disk_backend/Part.pm index 85e3cf48..1e26b902 100644 --- a/lib/ManaTools/Shared/disk_backend/Part.pm +++ b/lib/ManaTools/Shared/disk_backend/Part.pm @@ -177,6 +177,37 @@ sub label { #============================================================= +=head2 is_equal + +=head3 INPUT + + $part: ManaTools::Shared::disk_backend::Part + +=head3 OUTPUT + + bool + +=head3 DESCRIPTION + + this method checks if the given part is equal to self + +=cut + +#============================================================= +sub is_equal { + my $self = shift; + my $part = shift; + + return 0 if ($self->label() ne $part->label()); + return 0 if ($self->type() ne $part->type()); + return 0 if (!$self->ins()->is_equal($part->ins())); + return 0 if (!$self->outs()->is_equal($part->outs())); + + return 1; +} + +#============================================================= + =head2 get_ins =head3 OUTPUT |