don't retransmit duplicate messages

This commit is contained in:
Anton Dyudin 2016-05-31 13:48:33 -07:00
parent bf469e5705
commit 6aa26a073b

View File

@ -1816,6 +1816,8 @@
++ pa-revise :: revise existing
|= {num/@ud gam/telegram}
=+ way=(sub count num)
?: =(gam (snag (dec way) grams))
+>.$ :: no change
=. grams (welp (scag (dec way) grams) [gam (slag way grams)])
(pa-refresh num gam)
--