From: nethack.allison <nethack.allison>
Date: Thu, 16 Dec 2004 01:58:20 +0000 (+0000)
Subject: shrieking monster failed to wake others
X-Git-Tag: MOVE2GIT~1390
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=6ecd84f0313829a592e21d375e4cdc8e4621dc98;p=nethack

shrieking monster failed to wake others

<email deleted> wrote on Friday, December 10, 2004:
> I was in a barracks with the soldiers sleeping.  I started fighting one soldier
> and threw a potion of acid on him.  I got the "The soldier shrieks in pain!"
> message, but none of the other soldiers in the barracks woke up.
---

diff --git a/doc/fixes34.4 b/doc/fixes34.4
index 77a962711..52316d17a 100644
--- a/doc/fixes34.4
+++ b/doc/fixes34.4
@@ -72,6 +72,7 @@ cannot drink from fountain, sink or surrounding water while swallowed
 don't hallucinate anything for an exploding black light as it dies
 give blindness feedback when moving into/through stinking cloud
 fix case on monster name when monster reflects floating eye's gaze
+monsters "shrieking in pain" from a potion didn't wake anything up
 
 
 Platform- and/or Interface-Specific Fixes
diff --git a/src/potion.c b/src/potion.c
index b894f65f5..cd77eca36 100644
--- a/src/potion.c
+++ b/src/potion.c
@@ -1215,6 +1215,9 @@ boolean your_fault;
 		    if (obj->blessed) {
 			pline("%s %s in pain!", Monnam(mon),
 			      is_silent(mon->data) ? "writhes" : "shrieks");
+			if (!is_silent(mon->data))
+				wake_nearto(mon->mx, mon->my,
+					    mon->data->mlevel * 10);
 			mon->mhp -= d(2,6);
 			/* should only be by you */
 			if (mon->mhp < 1) killed(mon);
@@ -1249,6 +1252,9 @@ boolean your_fault;
 		if (!resists_acid(mon) && !resist(mon, POTION_CLASS, 0, NOTELL)) {
 		    pline("%s %s in pain!", Monnam(mon),
 			  is_silent(mon->data) ? "writhes" : "shrieks");
+		    if (!is_silent(mon->data))
+				wake_nearto(mon->mx, mon->my,
+					    mon->data->mlevel * 10);
 		    mon->mhp -= d(obj->cursed ? 2 : 1, obj->blessed ? 4 : 8);
 		    if (mon->mhp < 1) {
 			if (your_fault)