aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGravatar Pouar <pouar@pouar.net>2020-09-10 14:05:05 -0500
committerGravatar Pouar <pouar@pouar.net>2020-09-10 14:05:05 -0500
commitb3159f6c353dbcb84b24c901afa3a1d30d22faf4 (patch)
tree6951f9cad49f219169905f6d29fe0f4d01fe5675
parentadd fart mechanic (diff)
ensure fart-count is reset upon messing
-rw-r--r--core/libexec/functions.lisp1
1 files changed, 1 insertions, 0 deletions
diff --git a/core/libexec/functions.lisp b/core/libexec/functions.lisp
index 79e2627..cdb5cf3 100644
--- a/core/libexec/functions.lisp
+++ b/core/libexec/functions.lisp
@@ -841,6 +841,7 @@
(setf (getf return-value :affected-clothes) affected-clothes)
(setf (getf return-value :leak-amount) amount-left)
(setf (getf return-value :mess-amount) amount))
+ (setf (fart-count-of messer) 0)
return-value)
(defunassert potty-on-toilet (prop &key wet mess pants-down (user (player-of *game*)))
(prop yadfa-props:toilet