Expand filter with bowl data.

This commit is contained in:
Fang 2017-12-12 16:54:33 +01:00
parent 77d03383b4
commit c5ea0cc028

View File

@ -12,9 +12,9 @@
/+ hall, hall-legacy :: libraries
/= seed /~ !>(.)
/= filter-gram
/^ $-(telegram:hall telegram:hall)
/^ $-({telegram:hall bowl:gall} telegram:hall)
/| /: /%/filter /!noun/
/~ |=(t/telegram:hall t)
/~ |=({t/telegram:hall bowl:gall} t)
==
::
::::
@ -1297,7 +1297,7 @@
?. (so-admire aut.gam) +>
:: clean up the message to conform to our rules.
=. sep.gam (so-sane sep.gam)
=. gam (filter-gram gam)
=. gam (filter-gram gam bol)
:: if we already have it, ignore.
=+ old=(~(get by known) uid.gam)
?. &(?=(^ old) =(gam (snag u.old grams)))