chiark
/
gitweb
/
~yarrgweb
/
ypp-sc-tools.main.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Cope with modern Perl's default @INC
[ypp-sc-tools.main.git]
/
yarrg
/
database-info-fetch
diff --git
a/yarrg/database-info-fetch
b/yarrg/database-info-fetch
index 041e008f4220e0a775c8ce4aeab18f5c7d4535ff..655d2ecdb05871502eed20e102476b0e4e80b274 100755
(executable)
--- a/
yarrg/database-info-fetch
+++ b/
yarrg/database-info-fetch
@@
-24,6
+24,8
@@
# are used without permission. This program is not endorsed or
# sponsored by Three Rings.
+BEGIN { unshift @INC, qw(.) }
+
use strict (qw(vars));
use JSON;
#use Data::Dumper;