Bandaid 2, a gross one.

This commit is contained in:
C. Guy Yarvin 2015-06-06 22:49:53 -07:00
parent 5818f4c437
commit c584282cd1
2 changed files with 9 additions and 0 deletions

View File

@ -287,6 +287,7 @@
::
++ sh-rend :: print on one line
|= gam=telegram
~& [%sh-rend gam]
(sh-pass:(sh-fact %txt ~(tr-line tr man.she gam)) q.q.gam)
::
++ sh-numb :: print msg number

View File

@ -393,6 +393,14 @@
==
::
%way :: outbound request
?: ?=([%a %went *] sih) :: XX AWFUL
~& %way-went-bug
?> ?=([@ ~] t.pax)
%- mo-awed
:* p.+>.sih
(?(%peer %poke %pull) i.t.pax)
~
==
?> ?=([%a %woot *] sih)
?> ?=([@ ~] t.pax)
%- mo-awed