diff options
Diffstat (limited to 'lib/GridFiller.pm')
| -rw-r--r-- | lib/GridFiller.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/GridFiller.pm b/lib/GridFiller.pm index 022b14b..2b92285 100644 --- a/lib/GridFiller.pm +++ b/lib/GridFiller.pm @@ -4,7 +4,7 @@ use namespace::autoclean; use GridFiller::Types qw(GridT WordListT); use GridFiller::Status; use GridFiller::Result; -use GridFiller::Chooser; +use GridFiller::Chooser::Smarter; use Carp; with 'MooseX::Log::Log4perl'; @@ -26,7 +26,7 @@ sub fill { my $status = GridFiller::Status->new({grid => $self->grid, words => $self->words}); my $result = GridFiller::Result->new({source_grid => $self->grid}); - my $chooser = GridFiller::Chooser->new({status => $status}); + my $chooser = GridFiller::Chooser::Smarter->new({status => $status}); while ($status->unfilled() && $status->has_next_word()) { my $word = $status->get_next_word(); |