stubbed out input-tracking in talk

This commit is contained in:
Philip C Monk 2014-12-16 21:07:50 -05:00
parent 0d49326235
commit ebac53c3a3
2 changed files with 12 additions and 1 deletions

View File

@ -61,6 +61,7 @@
$: %rush
$= p
$% [%txt p=cord]
[%type p=?]
== ==
$: %rust
$= p
@ -392,6 +393,16 @@
?> ?=(%txt -.p.sih)
(pour-shell ost p.p.sih)
==
::
%cmd-ac
?- +<.sih
%nice [~ +>.$]
%mean [(send /out %give +.sih) +>.$]
?(%rush %rust)
?> ?=(%type -.p.sih)
~& [%talk-inputting p.p.sih]
[~ +>.$]
==
::
%command
?> ?=(?(%mean %nice) +<.sih)
@ -442,6 +453,7 @@
^- [(list move) _+>]
:_ +>
:~ [ost %pass /cmd-in %g %show [our.hid +.imp.hid] you /in/[-.imp.hid]]
[ost %pass /cmd-ac %g %show [our.hid +.imp.hid] you /active/[-.imp.hid]]
^- move
:* ost %pass /server
%g %show

View File

@ -162,7 +162,6 @@
==
::
%type
~& > %inputz
(send %type -:!>(*?) p.jof)
==
::