X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=extra%2Fwordlet%2Fwordlet.factor;h=05a0bbd5eda7b8b59511b4dbadad7f79d8c07ddb;hp=151a6d72fe48496d271a45bfe1245fc87d68938c;hb=cd4acad53fb730af0722345ef3a02236ccbf80f4;hpb=46bc9c866f85354570baec691b6a858c0c46d7aa diff --git a/extra/wordlet/wordlet.factor b/extra/wordlet/wordlet.factor index 151a6d72fe..05a0bbd5ed 100644 --- a/extra/wordlet/wordlet.factor +++ b/extra/wordlet/wordlet.factor @@ -49,7 +49,7 @@ TUPLE: wordlet-game secret-word chances guesses ; guess>chars ] with map concat members [ background of ] assoc-map - [ first ] collect-value-by + [ drop ] collect-value-by [ [ color>n ] zip-with sort-values reverse first first ] assoc-map CHAR: a CHAR: z [a..b] [ 1string COLOR: white ] { } map>assoc [ or ] assoc-merge ;