Don't show $0 fate card followup.

logins
Thomas Hintz 5 years ago
parent 6ad836e325
commit 92d1f7a0e1

@ -754,11 +754,14 @@
(value . ,(alist-ref 'contents ff)))))) (value . ,(alist-ref 'contents ff))))))
((eq? name 'ff-money) ((eq? name 'ff-money)
(set! (game-actions game) (cdr (game-actions game))) (set! (game-actions game) (cdr (game-actions game)))
(set-ui-action! `((action . "money") (value . ,value)) (if (= value 0)
game) (loop)
(create-ws-response player "action" (begin
`((action . "money") (set-ui-action! `((action . "money") (value . ,value))
(value . ,value)))) game)
(create-ws-response player "action"
`((action . "money")
(value . ,value))))))
((eq? name 'ff-uncle-bert) ((eq? name 'ff-uncle-bert)
(set! (game-actions game) (cdr (game-actions game))) (set! (game-actions game) (cdr (game-actions game)))
(set-ui-action! `((action . "ff-uncle-bert") (value . #f)) (set-ui-action! `((action . "ff-uncle-bert") (value . #f))

Loading…
Cancel
Save