diff options
Diffstat (limited to 'src/player.lisp')
| -rw-r--r-- | src/player.lisp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/player.lisp b/src/player.lisp index c9033ac..992c951 100644 --- a/src/player.lisp +++ b/src/player.lisp @@ -54,7 +54,8 @@ (when stocked-item (setq cash (+ cash (* (cdr stocked-item) - (commodities:price item)))))))) + (commodities:price item)))) + (cdr stocked-item))))) (defmethod find-item ((p player) name) (with-slots (stock) p |