desk-jams: update

Also cleans docket back up.

pkg/arvo/tmp/base.jam

@@ -1,3 +1,3 @@
 version https://git-lfs.github.com/spec/v1
-oid sha256:5c11b58b242c1a9ecc6a38b4a973b649e6e4cdb8564750c77eca43bb4a8b2673
-size 3435011
+oid sha256:422a24262e4b833c37bcd9b4e7cb791988c60b7dfdd1717cf26f00527dbee274
+size 3437147

pkg/arvo/tmp/bitcoin.jam

@@ -1,3 +1,3 @@
 version https://git-lfs.github.com/spec/v1
-oid sha256:0ed5eb6e5e3a65e6133f41ee1a3b42f491c6e330e9706e9739c985c82a7bfba9
-size 456352
+oid sha256:0b47b70d327dd15f0404eb997f5bb01540bf20a2dce7a3c5ef60e1d6b14b4323
+size 460354

pkg/arvo/tmp/garden.jam

@@ -1,3 +1,3 @@
 version https://git-lfs.github.com/spec/v1
-oid sha256:41adc2a69b36c4789ad0d03f0bd013bdf590fbaec5764931864a09573b6dda10
-size 375596
+oid sha256:0ee64f5d743f70ffd86bcb0d5a939730437f6edbd3ba6dd952bb2d2dea7a5e8f
+size 374466

pkg/arvo/tmp/landscape.jam

@@ -1,3 +1,3 @@
 version https://git-lfs.github.com/spec/v1
-oid sha256:21faf972905f76b7c0f78872b902f92c159beb068a07e46e2070fdf04fb18d47
-size 1808522
+oid sha256:5f36c76aefedee3f5cb181eef6e45639220a635c2a5960f0631f7bfcddec20b8
+size 1810008

pkg/arvo/tmp/webterm.jam

@@ -1,3 +1,3 @@
 version https://git-lfs.github.com/spec/v1
-oid sha256:a91c88c06d38020cf6d733dc2466578e636c57b102b66b7fd0c9872883b918ca
-size 306442
+oid sha256:05bf8142e0ea53397bd9fbf28304743fe332b8ad4b1b2e7bd68ec1872bf9c2c9
+size 305573

pkg/garden/app/docket.hoon

@@ -36,6 +36,7 @@
     def   ~(. (default-agent this %|) bowl)
     cc    ~(. +> bowl)
     ch    ch:cc
+    cg    cg:cc
 ::
 ++  on-init
   ^-  (quip card _this)
@@ -88,7 +89,6 @@
   ++  install
     |=  [=ship =desk]
     ^-  (quip card _state)
-    ~&  [dap.bowl %install ship desk]
     =+  .^(=treaty:treaty %gx (scry:io %treaty /treaty/(scot %p ship)/[desk]/noun))
     ?:  (~(has by charges) desk)
       ~|  bad-install-desk/desk
@@ -102,7 +102,6 @@
   ++  uninstall
     |=  =desk
     ^-  (quip card _state)
-    ~&  [dap.bowl %uninstall desk]
     =/  =charge  ~|(no-charge-installed+desk (~(got by charges) desk))
     =.  charges  (~(del by charges) desk)
     =?  by-base  ?=(%glob -.href.docket.charge)
@@ -135,7 +134,7 @@
       ~|  [%glob-unavailable requested=hash have=have]
       ?>  =(hash have)
       :_  state
-      (fact-init-kick:io (glob:cg:cc glob.chad.charge))
+      (fact-init-kick:io (glob:cg glob.chad.charge))
     ==
   [cards this]
 ::
@@ -163,7 +162,7 @@
     ::
       [%x %charges ~]
     :-  ~  :-  ~
-    %-  charge-update:cg:cc
+    %-  charge-update:cg
     :-  %initial
     %-  ~(gas by *(map desk charge))
     %+  turn  ~(tap by charges)
@@ -185,24 +184,21 @@
   ::
   ++  take-kiln
     ^-  (quip card _state)
-    ~&  [dap.bowl %take-kiln -.sign]
     ?+  -.sign   (on-agent:def:cc wire sign)
       %kick  [(~(watch-our pass /kiln) %hood /kiln/vats)^~ state]
     ::
         %fact
-      ~&  [dap.bowl %kiln-fact p.cage.sign]
       ?.  ?=(%kiln-vats-diff-0 p.cage.sign)  `state
       =+  !<(=diff:hood q.cage.sign)
-      ~&  [dap.bowl %kiln-diff -.diff]
       =*  cha  ~(. ch desk.diff)
       ?-  -.diff
           ?(%block %reset %merge-sunk %merge-fail)
-        ~&  [dap.bowl %ignoring-kiln-diff -.diff]  ::TODO  removeme
         `state
       ::
           %commit
-        =*  cha  ~(. ch desk.diff)
-        ?.  docket-exists:cha  `state
+        ?.  docket-exists:cha
+          ~&  [dap.bowl %no-docket-file-for desk.diff]
+          `state
         ::  always update the docket in state to match clay's
         ::
         =/  =docket            docket:cha
@@ -218,7 +214,6 @@
         =.  by-base  (~(put by by-base) base.href.docket desk.diff)
         ::  if the glob specification is unchanged, keep it
         ::
-        ::
         ?:  &(?=(^ pre) =(href.docket.u.pre href.docket))
           [~[add-fact:cha] state]
         ::  if the glob spec changed, but we already host it, keep it
@@ -354,6 +349,7 @@
 ++  on-fail  on-fail:def
 ++  on-leave  on-leave:def
 --
+::
 |_  =bowl:gall
 ++  io    ~(. agentio bowl)
 ++  pass  pass:io