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

[sheet.git] / tools / wordpairs

diff --git a/tools/wordpairs b/tools/wordpairs
index 9ba87f4da9980786768e91e78d29abf297eb703a..8dce28531fc067a6ba203f8be9c91ea2296a979e 100755 (executable)
--- a/tools/wordpairs
+++ b/tools/wordpairs
@@ -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::DB;
 use Data::Dump 'pp';