X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?a=blobdiff_plain;f=pctb%2Fyppsc-resolver-pixoptions;h=5b7a825fd4daded0a1cfe3c7cb0a34e27ee448ef;hb=6a3c0962283d32bc6e5f6c47c929baf37ddc642f;hp=eff5b021ab2ca256c7c77a325a2dc0b4fc870f90;hpb=3768c30b78a0afa7ca2c69c21365429c98cd868a;p=ypp-sc-tools.web-live.git

diff --git a/pctb/yppsc-resolver-pixoptions b/pctb/yppsc-resolver-pixoptions
index eff5b02..5b7a825 100755
--- a/pctb/yppsc-resolver-pixoptions
+++ b/pctb/yppsc-resolver-pixoptions
@@ -34,7 +34,7 @@ our ($which) = shift @ARGV;
 
 $which =~ s/\W//g;
 
-our ($pctb)= 'http://pctb.ilk.org/';
+our ($pctb) = $ENV{'YPPSC_PCTB_PCTB'};  die unless $pctb;
 our ($ua)= LWP::UserAgent->new;
 our $jsonresp;
 
@@ -69,7 +69,7 @@ sub ptcl ($) {
 }
     
 sub main__island () {
-    my $url= "$pctb/islands.php?oceanName=MIDNIGHT";
+    my $url= "$pctb/islands.php?oceanName=SAGE";
     my $resp= $ua->get($url);
     die $resp->status_line unless $resp->is_success;
     $jsonresp= $resp->content;