format more methods as bools

1 files changed, 2 insertions, 2 deletions

diff --git a/lib/Bot/Games/Game/Spook.pm b/lib/Bot/Games/Game/Spook.pm
index 415c5b4..f15ddfa 100644
--- a/lib/Bot/Games/Game/Spook.pm
+++ b/lib/Bot/Games/Game/Spook.pm
@@ -12,7 +12,7 @@ command valid_move => sub {
     my ($move) = @_;
     return is_subpermutation($self->state, uc($move))
         && length($self->state) + 1 == length($move);
-};
+}, formatter => __PACKAGE__->meta->formatter_for('Bool');
 
 command valid_word_from_state => sub {
     my $self = shift;
@@ -20,7 +20,7 @@ command valid_word_from_state => sub {
     $word = uc join '', sort split(//, $word);
     my $state = join '', sort split(//, $self->state);
     return $word eq $state;
-};
+}, formatter => __PACKAGE__->meta->formatter_for('Bool');
 
 __PACKAGE__->meta->make_immutable;
 no Bot::Games::OO::Game;