mirror of
https://github.com/urbit/shrub.git
synced 2025-01-04 10:32:34 +03:00
uses ++se-aint in ++se-view and ++se-belt
This commit is contained in:
parent
dba8cace15
commit
06910221b0
@ -312,11 +312,9 @@
|
||||
{$yow *} ~&([%no-yow -.bet] +>)
|
||||
==
|
||||
=+ gul=se-agon
|
||||
=+ tur=?~(gul ~ (~(get by fug) u.gul)) :: XX se-aint
|
||||
?: |(?=($~ gul) ?=($~ tur) ?=($~ u.tur))
|
||||
?: |(?=($~ gul) (se-aint u.gul))
|
||||
(se-blit %bel ~)
|
||||
=< ta-abet
|
||||
(ta-belt:(se-tame u.gul) bet)
|
||||
ta-abet:(ta-belt:(se-tame u.gul) bet)
|
||||
::
|
||||
++ se-born :: new server
|
||||
|= wel/well
|
||||
@ -398,9 +396,7 @@
|
||||
++ se-view :: flush buffer
|
||||
^+ .
|
||||
=+ gul=se-agon
|
||||
=+ tur=?~(gul ~ (~(get by fug) u.gul)) :: XX se-aint
|
||||
?: |(?=($~ gul) ?=($~ tur) ?=($~ u.tur))
|
||||
+>
|
||||
?: |(?=($~ gul) (se-aint u.gul)) +
|
||||
(se-just ta-vew:(se-tame u.gul))
|
||||
::
|
||||
++ se-emit :: emit move
|
||||
|
Loading…
Reference in New Issue
Block a user