diff --git a/bin/solid.pill b/bin/solid.pill
index 74f3c5d75..b536ccd2d 100644
--- a/bin/solid.pill
+++ b/bin/solid.pill
@@ -1,3 +1,3 @@
 version https://git-lfs.github.com/spec/v1
-oid sha256:db17380940f4f10dab139b385cf5f752282e069b290cdb5255c8510e5cc36ea7
-size 14122439
+oid sha256:d89d1363875673646bfdf6cf37c2b5d07d085cf5cf64a604875289c09fb653aa
+size 9633371
diff --git a/pkg/arvo/sys/vane/ames.hoon b/pkg/arvo/sys/vane/ames.hoon
index d060625b8..b504b037e 100644
--- a/pkg/arvo/sys/vane/ames.hoon
+++ b/pkg/arvo/sys/vane/ames.hoon
@@ -1163,11 +1163,70 @@
   --
 ::  +scry: dereference namespace
 ::
+::    The ones producing vases are expected to be used like this:
+::
+::    &tang [(sell .^(vase %a /=peer=/~zod)) ~]
+::
 ++  scry
   |=  [fur=(unit (set monk)) ren=@tas why=shop syd=desk lot=coin tyl=path]
   ^-  (unit (unit cage))
+  ?.  =(lot [%$ %da now])  ~
+  ?.  =(%$ ren)  [~ ~]
+  ?.  =([%& our] why)
+    [~ ~]
+  ?+    syd  ~
+      %peer
+    ?.  ?=([@ ~] tyl)  [~ ~]
+    =/  who  (slaw %p i.tyl)
+    ?~  who  [~ ~]
+    =/  per  (~(get by peers.ames-state) u.who)
+    =/  res
+      ?-  per
+        ~             %unknown
+        [~ %alien *]  %alien
+        [~ %known *]
+        =,  u.per
+        :*  %known
+            symkeymug=(mug symmetric-key)
+            life=life
+            pubkey=public-key
+            sponsor=sponsor
+            route=route
+            qos=qos
+            ossuary=ossuary
+            snd=~(key by snd)
+            rcv=~(key by rcv)
+            nax=nax
+            heeds=heeds
+        ==
+      ==
+    ``noun+!>(!>(res))
   ::
-  [~ ~]
+      %bones
+    ?.  ?=([@ ~] tyl)  [~ ~]
+    =/  who  (slaw %p i.tyl)
+    ?~  who  [~ ~]
+    =/  per  (~(get by peers.ames-state) u.who)
+    ?.  ?=([~ %known *] per)  [~ ~]
+    =/  res
+      =,  u.per
+      [snd=~(key by snd) rcv=~(key by rcv)]
+    ``noun+!>(res)
+  ::
+      %snd-bone
+    ?.  ?=([@ @ ~] tyl)  [~ ~]
+    =/  who  (slaw %p i.tyl)
+    ?~  who  [~ ~]
+    =/  ost  (slaw %ud i.t.tyl)
+    ?~  ost  [~ ~]
+    =/  per  (~(get by peers.ames-state) u.who)
+    ?.  ?=([~ %known *] per)  [~ ~]
+    =/  mps  (~(get by snd.u.per) u.ost)
+    ?~  mps  [~ ~]
+    =/  res
+      u.mps
+    ``noun+!>(!>(res))
+  ==
 --
 ::  helpers
 ::
@@ -2533,7 +2592,7 @@
     ^+  message-pump
     =/  top-live
       (peek:packet-queue:*make-packet-pump live.packet-pump-state.state)
-    ?.  |(?=(~ top-live) (gte current.state message-num.key.u.top-live))
+    ?.  |(?=(~ top-live) (lte current.state message-num.key.u.top-live))
       ~|  [%strange-current current=current.state key.u.top-live]
       !!
     message-pump