From ce22d17c01d0efcb0644d6af08349aa8b3ee45a8 Mon Sep 17 00:00:00 2001
From: cohrs <cohrs>
Date: Sat, 9 Mar 2002 04:10:24 +0000
Subject: [PATCH] lava effects while riding - a case missed by the earlier lava
 patch, if you enter the lava while mounted, your steed would be unaffected if
 you were lifesaved - fix by making more code shared with the is_pool case

---
 src/hack.c | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/hack.c b/src/hack.c
index 858b4cc17..e1e1109e7 100644
--- a/src/hack.c
+++ b/src/hack.c
@@ -1329,9 +1329,7 @@ boolean pick;
 stillinwater:;
 	if (!Levitation && !u.ustuck && !Flying) {
 	    /* limit recursive calls through teleds() */
-	    if(is_lava(u.ux,u.uy) && lava_effects())
-		    return;
-	    if (is_pool(u.ux, u.uy)) {
+	    if (is_pool(u.ux, u.uy) || is_lava(u.ux, u.uy)) {
 #ifdef STEED
 		if (u.usteed && !is_flyer(u.usteed->data) &&
 			!is_floater(u.usteed->data) &&
@@ -1343,7 +1341,9 @@ stillinwater:;
 			pick = FALSE;
 		} else
 #endif
-		if (!Wwalking && drown())
+		if (is_lava(u.ux, u.uy)) {
+		    if (lava_effects()) return;
+		} else if (!Wwalking && drown())
 		    return;
 	    }
 	}