Chat repl time

main/bin/chat.hoon

@@ -15,7 +15,7 @@
               [%tower p=@p]
               [%s p=path]
           ==
-      =+  flags=*(list flag)
+      =+  [flags=*(list flag) lat=&3:%]
       =>  |%
           ++  chat                                      ::  user action
             $%  [%all p=mess]                           ::  say
@@ -74,7 +74,8 @@
             :_  text
             |=  a=@t
             ^-  (unit ,[p=@t q=tank])
-            =+  hun=(rush a wide:vast)
+            ~!  %
+            =+  hun=(rush a wide:(vang | &1:% &2:% lat |3:%))
             ?~  hun  ~
             ?~(a ~ [~ a (sell (slap !>(sed) u.hun))])
           ::
@@ -269,7 +270,7 @@
   |=  [now=@da txt=@t]
   ^+  +>
   ?:  =(0 txt)  +>
-  =+  rey=(rush txt chat)
+  =+  rey=(rush txt chat(lat (scot da/est)))
   ?~  rey
     (show %leaf "invalid input")
   |-