Don't register for events in the past.

This commit is contained in:
C. Guy Yarvin 2013-11-18 23:48:12 -08:00
parent 746f5e9a59
commit 0b144dc1b4

View File

@ -161,7 +161,7 @@
++ show |=(tan=tank %_(+> giz :_(giz [%la tan]))) :: print to screen
++ take :: alarm event
|- ^+ +
=. wak (add ~m1 wak)
=. wak (add ~m1 (max wak est))
?.(=(0 oot) + (joke ~ `zing`[%ego est]))
::
++ toke :: user action