diff options
| -rw-r--r-- | lib/Bot/Games/Game/Spook.pm | 2 | ||||
| -rw-r--r-- | lib/Bot/Games/Game/Xghost.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lib/Bot/Games/Game/Spook.pm b/lib/Bot/Games/Game/Spook.pm index 83b3890..bba3f41 100644 --- a/lib/Bot/Games/Game/Spook.pm +++ b/lib/Bot/Games/Game/Spook.pm @@ -11,7 +11,7 @@ has '+help' => ( sub valid_move { my $self = shift; my ($move) = @_; - return is_subpermutation($self->state, $move) + return is_subpermutation($self->state, uc($move)) && length($self->state) + 1 == length($move); } diff --git a/lib/Bot/Games/Game/Xghost.pm b/lib/Bot/Games/Game/Xghost.pm index 346ddf6..2dbf532 100644 --- a/lib/Bot/Games/Game/Xghost.pm +++ b/lib/Bot/Games/Game/Xghost.pm @@ -11,7 +11,7 @@ has '+help' => ( sub valid_move { my $self = shift; my ($move) = @_; - return is_substring($self->state, $move) + return is_substring($self->state, uc($move)) && length($self->state) + 1 == length($move); } |