X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/a8e02f8948b961a27b47965e0eab1fcc1c207915..50442220cc52bad55c1003de34f8dada958650d5:/tools/mkwordlist diff --git a/tools/mkwordlist b/tools/mkwordlist index 78859b4..2e38a8d 100755 --- a/tools/mkwordlist +++ b/tools/mkwordlist @@ -13,7 +13,7 @@ use Data::Dump 'pp'; my %rows; if (my $lang = shift @ARGV) { my %filter = (lang => $lang); - my $cols = "ref, id, prio, array_to_string(form || alt, '/')"; + my $cols = "ref, array_to_string(form || alt, '/'), prio, id, cat"; %rows = $db->select(_word_ref => $cols, \%filter)->map_arrays; say pp \%rows =~ s/\\x\{([0-9A-F]+)\}/chr hex $1/ger;