urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-19 08:32:39 +03:00
Code Issues Packages Projects Releases Wiki Activity

herm: close old-style subscriptions

Browse Source
This commit is contained in:
fang 2021-06-23 15:24:42 +02:00
parent cb10d46b88
commit 1b95f934c7
No known key found for this signature in database
GPG Key ID: EB035760C1BBA972
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
pkg/arvo/app/herm.hoon
View File

@ -61,7 +61,7 @@
?+ wire !! ?+ wire !!
:: pass on dill blits for the session :: pass on dill blits for the session
:: ::
[?(%view %dill) @ ~] ::NOTE /view for backwards compat [%dill @ ~]
=* ses i.t.wire =* ses i.t.wire
?. ?=([%dill %blit *] sign-arvo) ?. ?=([%dill %blit *] sign-arvo)
~| [%unexpected-sign [- +<]:sign-arvo] ~| [%unexpected-sign [- +<]:sign-arvo]
@ -70,6 +70,13 @@
%+ turn p.sign-arvo %+ turn p.sign-arvo
|= =blit:dill |= =blit:dill
[%give %fact [%session ses ~]~ %blit !>(blit)] [%give %fact [%session ses ~]~ %blit !>(blit)]
::
:: clean up old-style subscriptions
::
[%view @ ~]
=* ses i.t.wire
:_ this
[%pass wire %arvo %d %shot ses %flee ~]~
== ==
:: ::
++ on-poke ++ on-poke