WIP island determination; use SAGE until we actually plumb through the ocean

diff --git a/pctb/yppsc-resolver-pixoptions b/pctb/yppsc-resolver-pixoptions
index eff5b021ab2ca256c7c77a325a2dc0b4fc870f90..7bbcb19fbb0f4fc4284b847cc6140d8fd0c7e94d 100755 (executable)
--- a/pctb/yppsc-resolver-pixoptions
+++ b/pctb/yppsc-resolver-pixoptions
@@ -69,7 +69,7 @@ sub ptcl ($) {
 }
     
 sub main__island () {
 }
     
 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;
     my $resp= $ua->get($url);
     die $resp->status_line unless $resp->is_success;
     $jsonresp= $resp->content;