summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lib/Games/Word.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Games/Word.pm b/lib/Games/Word.pm
index f721afb..f875c67 100644
--- a/lib/Games/Word.pm
+++ b/lib/Games/Word.pm
@@ -198,7 +198,7 @@ sub is_substring {
return 1 if $substring eq '';
return 0 if $string eq '';
my $re = join('?', map { quotemeta } split(//, $string)) . '?';
- return $substring =~ $re;
+ return $substring =~ /^$re$/;
}
=item all_substrings STRING