WIP overhaul of plumbing, databases, etc.

[ypp-sc-tools.web-live.git] / pctb / yppsc-commod-processor

diff --git a/pctb/yppsc-commod-processor b/pctb/yppsc-commod-processor
index 01db528889af367558bb6add9f82f08e7ade862e..32763293ac705f6128cd88a7312000ce296501ae 100755 (executable)
--- a/pctb/yppsc-commod-processor
+++ b/pctb/yppsc-commod-processor
@@ -218,7 +218,8 @@ sub main__tsv () {
 
 
 our (%commodmap);
-our ($pctb) = 'http://pctb.ilk.org/';
+our ($pctb) = $ENV{'YPPSC_PCTB_PCTB'};  die unless $pctb;
+
 our ($ua)= LWP::UserAgent->new;
 
 sub load_commodmap() {