Enemies dont go away when hitting you anymore

[uxul-world.git] / burning-marshmallow.lisp

diff --git a/burning-marshmallow.lisp b/burning-marshmallow.lisp
index 5d08382..cb8b374 100644 (file)
--- a/burning-marshmallow.lisp
+++ b/burning-marshmallow.lisp
@@ -101,12 +101,13 @@
        (setf (animation obj) (slot-value obj 'rd-animation)))))))
 
 
+; already defined in simple-enemy.lisp - possibly a bug?
 
-(defun simple-enemy-and-player (player enemy)
-  (decf (power player))
-  (setf (active enemy) nil)
-  (setf (visible enemy) nil)
-  (setf (colliding enemy) nil))
+;; (defun simple-enemy-and-player (player enemy)
+;;   (decf (power player))
+;;   (setf (active enemy) nil)
+;;   (setf (visible enemy) nil)
+;;   (setf (colliding enemy) nil))
 
 (defmethod player-hits-enemy ((player player) (enemy burning-marshmallow) &rest args)
   (declare (ignore args))