mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-12-25 07:52:59 +03:00
adds support for meta-r to drum
This commit is contained in:
parent
a18701c282
commit
3114ba320f
@ -787,7 +787,14 @@
|
||||
ta-bel
|
||||
+>(pos.inp (jump-fwrd pos.inp buf.say.inp))
|
||||
::
|
||||
$r ta-bel
|
||||
$r %- ta-hom(lay.hit (~(put by lay.hit) pos.hit ~))
|
||||
:~ %mor
|
||||
(ta-cut 0 (lent buf.say.inp))
|
||||
%+ ta-cat 0
|
||||
?: =(pos.hit num.hit) ~
|
||||
(snag (sub num.hit +(pos.hit)) old.hit)
|
||||
==
|
||||
::
|
||||
$t =+ a=(jump-fwrd pos.inp buf.say.inp)
|
||||
=+ b=(jump-bwrd a buf.say.inp)
|
||||
=+ c=(jump-bwrd b buf.say.inp)
|
||||
|
Loading…
Reference in New Issue
Block a user