chiark / gitweb /
Prettify the html very slightly
[ypp-sc-tools.web-live.git] / yarrg / web / pirate-route
index e414e6e87513cfda4f030fbd1f224bb273e6b349..0f2fff729405a4c31bfd6a4f621a28f6d61dab8e 100644 (file)
@@ -63,7 +63,7 @@ foreach my $var (@vars) {
                print $html, $after;
                $cvalix++;
        }
-       print '<p>';
+       print "<p>\n\n";
 }
 
 die "unknown ocean $a{Ocean} ?"
@@ -82,7 +82,7 @@ Enter route (islands, or archipelagoes, separated by |s or commas;
  abbreviations are OK):<br/>
 
 <script type="text/javascript">
-tr_uri= "routetextstring?format=json"
+tr_uri= "routetextstring?format=json&type=text/xml"
                + "&ocean=<% uri_escape($a{Ocean}) %>";
 
 tr_timeout=false;
@@ -95,8 +95,7 @@ function tr_Later(){
 }
 function tr_Needed(){
   window.clearTimeout(tr_timeout);
-  //tr_element= document.getElementsByName('routestring').item(0);
-  //alert(tr_element.name);
+  tr_element= document.getElementById('routestring');
   tr_needed= tr_element.value;
   tr_Request();
 }
@@ -113,9 +112,8 @@ function tr_Ready() {
   if (tr_request.readyState != 4) return;
   if (tr_request.status == 200) {
     response= tr_request.responseText;
-    //alert('got [[ '+response+' ]]');
     eval('results='+response);
-    toedit= document.getElementsByName('routeresults').item(0);
+    toedit= document.getElementById('routeresults');
     toedit.innerHTML= results['show'];
   }
   tr_request= false;
@@ -123,11 +121,10 @@ function tr_Ready() {
 }
 </script>
 
-<input type="text" name="routestring" size=80
- onchange="tr_element= event.currentTarget; tr_Needed();"
- onkeydown="tr_element= event.currentTarget; tr_Later();"><br>
-<div name="routeresults">&nbsp;</div><br/>
-
+<input type="text" id="routestring" name="routestring" size=80
+ onchange="tr_Needed();"
+ onkeyup="tr_Later();"><br>
+<div id="routeresults">&nbsp;</div><br/>
 % } else {
 
 <%perl>