chiark
/
gitweb
/
~yarrgweb
/
ypp-sc-tools.web-live.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.web-live.git]
/
yarrg
/
commod-email-processor
diff --git
a/yarrg/commod-email-processor
b/yarrg/commod-email-processor
index e65b2b6a91fcfe2237f6d8c123e0891a0ec5cebd..ff0880e9c876d6f14118d38c00149130de511f18 100755
(executable)
--- a/
yarrg/commod-email-processor
+++ b/
yarrg/commod-email-processor
@@
-34,6
+34,8
@@
BEGIN {
my $selfdir= $0;
$selfdir =~ s,/+[^/]*$,,;
chdir("$selfdir") or die "$selfdir $!";
+
+ unshift @INC, qw(.);
}
use Commods;