diff --git a/basis/unicode/collation/collation.factor b/basis/unicode/collation/collation.factor index 8142fe7533..3cbc876ba3 100644 --- a/basis/unicode/collation/collation.factor +++ b/basis/unicode/collation/collation.factor @@ -131,7 +131,7 @@ ducet get-global insert-helpers [ [ primary>> ] append-weights { 0 } ] [ [ secondary>> ] append-weights { 0 } ] [ [ tertiary>> ] append-weights { 0 } ] - [ [ variable-weight ] map ] + [ [ [ secondary>> ] [ tertiary>> ] bi [ zero? ] bi@ and not ] filter [ variable-weight ] map ] } cleave ] { } append-outputs-as ;