From b1e3863b4350cbb9a9ef2ff8994a1156d2e3aa9f Mon Sep 17 00:00:00 2001
From: Pasi Kallinen <paxed@alt.org>
Date: Sat, 30 Sep 2023 21:15:20 +0300
Subject: [PATCH] Stop occupation when timed levitation or choking issues a
 message

---
 doc/fixes3-7-0.txt | 1 +
 src/timeout.c      | 2 ++
 2 files changed, 3 insertions(+)

diff --git a/doc/fixes3-7-0.txt b/doc/fixes3-7-0.txt
index 136874988..0b6e73913 100644
--- a/doc/fixes3-7-0.txt
+++ b/doc/fixes3-7-0.txt
@@ -1246,6 +1246,7 @@ the throne room on the Samurai quest home level lacked a throne but gave
 	"You enter an opulent throne room!" message the first time it was
 	entered; vary the message rather than add a throne
 coughing due to stinking cloud wakes up nearby monsters
+stop occupation when timed levitation or choking issues a message
 
 
 Fixes to 3.7.0-x General Problems Exposed Via git Repository
diff --git a/src/timeout.c b/src/timeout.c
index f1ec05893..65306af7f 100644
--- a/src/timeout.c
+++ b/src/timeout.c
@@ -292,6 +292,7 @@ choke_dialogue(void)
                 urgent_pline(str, hcolor(NH_BLUE));
             else
                 urgent_pline("%s", str);
+            stop_occupation();
         }
     }
     exercise(A_STR, FALSE);
@@ -357,6 +358,7 @@ levitation_dialogue(void)
                          danger ? surface(u.ux, u.uy) : "air");
         } else
             pline1(s);
+        stop_occupation();
     }
 }