shrub/main/app/appbug-2/core.hoon

!:  |=  *
:::::::::   Foobug: a simple application.
::
|_  [hid=hide vat=[%0 p=@ud]]
++  poke
  |=  [ost=bone *]
  :_  +>(p.vat +(p.vat))
  :~  [ost %give %rasp ~ %json *json]
      [%c %pass]
  ==
::
++  peek
  |=  [you=ship pax=path]
  :-  %hymn
  ^-  manx
  ;html
    ;head
      ;title: Foobug!
    ==
    ;body
      ;p: Dude, a better answer is {<p.vat>}.
      ;button(onclick "bump()"): (Bump.)
      ;script
        ; var mess = 0;
        ;
        ; function bump() {
        ;   xhr = new XMLHttpRequest();
        ;   xhr.onload = function() { mess++; } 
        ;   xhr.open("PUT", "/tim/"+user+"/"+appl+"/"+port+"/"+mess);
        ;   xhr.setRequestHeader("content-type", "text/json");
        ;   xhr.send(JSON.stringify({oryx: oryx, xyro: {}}));
        ; }
      ==
    ==
  ==
--