diff options
author | Maarten Vanraes <alien@mageia.org> | 2016-04-24 21:21:28 +0200 |
---|---|---|
committer | Maarten Vanraes <alien@mageia.org> | 2016-04-24 23:22:11 +0200 |
commit | d6a8541b5c84daf5f844a47077974d1d7f3453f8 (patch) | |
tree | 3a2317e15a4a64f53922beac2d13c65097fe56b4 /lib | |
parent | 7b79a6b21d9404cff72f2378d0eef9646dbceba9 (diff) | |
download | manatools-d6a8541b5c84daf5f844a47077974d1d7f3453f8.tar manatools-d6a8541b5c84daf5f844a47077974d1d7f3453f8.tar.gz manatools-d6a8541b5c84daf5f844a47077974d1d7f3453f8.tar.bz2 manatools-d6a8541b5c84daf5f844a47077974d1d7f3453f8.tar.xz manatools-d6a8541b5c84daf5f844a47077974d1d7f3453f8.zip |
Action role need a string comparison
Diffstat (limited to 'lib')
-rw-r--r-- | lib/ManaTools/Shared/ActionsRole.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/ManaTools/Shared/ActionsRole.pm b/lib/ManaTools/Shared/ActionsRole.pm index 888750b3..e4c69c69 100644 --- a/lib/ManaTools/Shared/ActionsRole.pm +++ b/lib/ManaTools/Shared/ActionsRole.pm @@ -118,7 +118,7 @@ sub act { my $key = shift; my $acts = $self->acts(); for my $action (@{$self->acts()}) { - if ($key == $action->name()) { + if ($key eq $action->name()) { return $action->act($self, @_); } } @@ -179,7 +179,7 @@ sub remove_action { my $index = scalar(@{$acts}); while ($index > 0) { $index = $index - 1; - if ($acts->[$index]->name() == $key) { + if ($acts->[$index]->name() eq $key) { delete $acts->[$index]; } } |