X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/2d5cb9836f4fbe3065accb1b99e12bb1ba4d6948..9aa3a0089bff9379b25186960929582f16e7b3f4:/unicode.plp diff --git a/unicode.plp b/unicode.plp index 744eed1..9b77f7f 100644 --- a/unicode.plp +++ b/unicode.plp @@ -36,7 +36,7 @@ Also see the complete digraphs table.

<: my $diinfo = do 'digraphs.inc.pl'; my %di = map { $diinfo->{$_}->[0] => $_ } grep { ref $diinfo->{$_} } - keys %$diinfo; + sort { length $a <=> length $b } keys %$diinfo; sub quote { local $_ = shift;