ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-15 18:12:47 +03:00
Code Issues Packages Projects Releases Wiki Activity

Proper command line editing, part 1.

Browse Source
This commit is contained in:
C. Guy Yarvin 2015-03-19 16:56:46 -07:00
parent 0e3706b22f
commit af65cca79a
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
main/app/dojo/core.hook
View File

@ -377,10 +377,13 @@
|= cag=cage
^+ +>+>
?> ?=(^ per)
?: |(?=(^ q.q.cag) =((lent buf.say) q.q.cag))
?: ?| ?=(^ q.q.cag)
=((lent buf.say) q.q.cag)
!&(?=(%del -.u.per) =(+(p.u.per) (lent buf.say)))
==
dy-abet(per ~)
=^ lic say (~(transmit cs say) u.per)
(dy-rush(per ~) %mor [%bel ~] [%det lic] ~)
(dy-rush(per ~) %mor [%det lic] [%err q.q.cag] ~)
::
++ dy-done :: dialog submit
|= txt=tape
@ -474,8 +477,7 @@
|= cag=cage
^+ +>+>
?. ?=(^ q.q.cag)
~& %dy-made-dial-fail
(dy-rash %bel ~)
(dy-rush %err q.q.cag)
=+ tan=((list tank) +2.q.q.cag)
=. +>+>.$ (he-rush %tan tan)
=+ vax=(spec (slot 3 q.cag))