From 9edec130637e5872306230559d7d101578f3aeb4 Mon Sep 17 00:00:00 2001
From: Pasi Kallinen <paxed@alt.org>
Date: Wed, 29 Apr 2015 20:35:46 +0300
Subject: [PATCH] Extract ball and chain before flooreffects

---
 src/ball.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/ball.c b/src/ball.c
index e1fa4b72a..c078f5ed3 100644
--- a/src/ball.c
+++ b/src/ball.c
@@ -112,12 +112,14 @@ placebc()
 	return;
     }
 
+    obj_extract_self(uchain);
     (void) flooreffects(uchain, u.ux, u.uy, "");	/* chain might rust */
 
     if (carried(uball))		/* the ball is carried */
 	u.bc_order = BCPOS_DIFFER;
     else {
 	/* ball might rust -- already checked when carried */
+	obj_extract_self(uball);
 	(void) flooreffects(uball, u.ux, u.uy, "");
 	place_object(uball, u.ux, u.uy);
 	u.bc_order = BCPOS_CHAIN;
-- 
2.40.0