SuperKamiGuru/foss-mmo
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix error when block cannot be pushed.

Browse source
This commit is contained in:
David Thompson 2024-05-25 10:31:50 -04:00
parent 86faff26b8
commit c066364b72
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
modules/game/actors.scm
View file

@ -163,8 +163,8 @@
(match ($ obj 'type) (match ($ obj 'type)
('switch (do-push)) ('switch (do-push))
('gate (when ($ obj 'open?) (do-push))) ('gate (when ($ obj 'open?) (do-push)))
(_ (values)))) (_ #f)))
(_ (values)))))))))))) (_ #f)))))))))))
(('pushed?) ($ pushed?)))) (('pushed?) ($ pushed?))))
(define (^clock-emitter bcom x y interval) (define (^clock-emitter bcom x y interval)