sc: lotv patch v5.0.13 (2024-03-26)

[sheet.git] / tools / mkwordthumb

diff --git a/tools/mkwordthumb b/tools/mkwordthumb
index d79a0029cf7c9359ba194638611aedf33d4eff2c..34c3b6ad8ebd99473d60e0427678297233dba027 100755 (executable)
--- a/tools/mkwordthumb
+++ b/tools/mkwordthumb
@@ -1,7 +1,7 @@
 #!/usr/bin/env perl
 use 5.014;
 use warnings;
 #!/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 ();
 use Shiar_Sheet::ImagePrep;
 use Shiar_Sheet::DB;
 use JSON ();