charset: link symbols group in shared menu

[sheet.git] / tools / mkwordthumb

diff --git a/tools/mkwordthumb b/tools/mkwordthumb
index b4e883cde9266c1347d0a08618bc185306578bf3..34c3b6ad8ebd99473d60e0427678297233dba027 100755 (executable)
--- a/tools/mkwordthumb
+++ b/tools/mkwordthumb
@@ -1,7 +1,7 @@
 #!/usr/bin/env perl
 use 5.014;
 use warnings;
-use lib '.';
+use lib $0 =~ s{[^/]+$}{..}r; # project root
 use Shiar_Sheet::ImagePrep;
 use Shiar_Sheet::DB;
 use JSON ();
@@ -17,6 +17,6 @@ while (my $row = $query->hash) {
        eval {
                my $meta = eval { JSON->new->decode($row->{image} // '{}') }
                        or die ["Invalid JSON metadata in image column.", $@];
-               $image->generate("data/word/en/$row->{id}.jpg", $meta->{convert});
+               $image->generate("data/word/32/$row->{id}.jpg", $meta->{convert});
        } or warn "$row->{id}: @{$@}";
 }