::  Kiln: make (subtree in) desk privately readable.
::
::::  /gen/hood/private/hoon
  ::
:-  %say
|=  $:  {now/@da eny/@uvJ bec/beak}
        {arg/{des/desk may/?($~ {pax/path $~})} $~}
    ==
:-  %kiln-permission
[des ?~(may / pax.may) |]:arg