allow INC stuffing via NETDISCO_INC env var

2014-06-22 22:19:35 +01:00
parent 7c47a277be
commit 2b09476f29
2 changed files with 6 additions and 0 deletions
--- a/Netdisco/bin/netdisco-daemon-fg
+++ b/Netdisco/bin/netdisco-daemon-fg
@@ -12,6 +12,9 @@ BEGIN {
  unshift @INC,
    dir($FindBin::RealBin)->parent->subdir('lib')->stringify,
    dir($FindBin::RealBin, 'lib')->stringify;
+
+  unshift @INC,
+    split m/:/, ($ENV{NETDISCO_INC} || '');
 }

 use App::Netdisco;
--- a/Netdisco/bin/netdisco-web-fg
+++ b/Netdisco/bin/netdisco-web-fg
@@ -18,6 +18,9 @@ BEGIN {
  unshift @INC,
    dir($FindBin::RealBin)->parent->subdir('lib')->stringify,
    dir($FindBin::RealBin, 'lib')->stringify;
+
+  unshift @INC,
+    split m/:/, ($ENV{NETDISCO_INC} || '');
 }

 use App::Netdisco;