sen disable

This commit is contained in:
Anton Dyudin 2015-02-06 12:56:21 -08:00
parent 4236ddf20d
commit f487f457ab

View File

@ -377,8 +377,8 @@
^+ .
?: =(%zong -.p.sih)
=+ zog=((hard zong) p.p.sih)
?: &(=(our.hid q.zog) (~(has in sen) r.zog))
+
:: ?: &(=(our.hid q.zog) (~(has in sen) r.zog))
:: + :: suppress own messages
:: ?: &(=(our.hid q.zog) =(`r.zog ~(top to sen)))
:: %_(+ sen ^+(sen ~(nap to sen)))
%_ +