X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=anamang;fp=anamang;h=54cd32b98a916284f94f11347d5dca9c58b86d62;hb=1c3ae3b43f687e96ab9deb0eb70041f44c70cb3f;hp=5ed37612fe3bf9b12671445adfa3b98e3c7217cf;hpb=3438a2f1682867b0244721ca9b1bf15e4da2496f;p=bin.git

diff --git a/anamang b/anamang
index 5ed3761..54cd32b 100755
--- a/anamang
+++ b/anamang
@@ -139,7 +139,7 @@ if ($options{acrostic}) {
 	    next if $let[$p] eq '?';
 	    $pos{$p} = $let[$p];
 	}
-	my @allowable_words = find_allowable_words($database,\%pos,$length);
+	my @allowable_words = find_allowable_words(database => $database,position => \%pos,length => $length);
 	if (@allowable_words > 200 and not $options{show_all}) {
 	    print STDERR "Only showing 200 of the " . @allowable_words . " possible words\n";
 	    @allowable_words = @allowable_words[0..199];