Anger abominations created via scrolls of summoning after the initial

summoning message.


git-svn-id: https://crawl-ref.svn.sourceforge.net/svnroot/crawl-ref/trunk@8481 c06c8d41-db1a-0410-9941-cceddc491573

1 files changed, 8 insertions, 3 deletions

diff --git a/crawl-ref/source/item_use.cc b/crawl-ref/source/item_use.cc
index b50de889d3..fe1a1c8bdf 100644
--- a/crawl-ref/source/item_use.cc
+++ b/crawl-ref/source/item_use.cc
@@ -4857,11 +4857,15 @@ void read_scroll(int slot)
         break;
 
     case SCR_SUMMONING:
-        if (create_monster(
-                mgen_data(MONS_ABOMINATION_SMALL, BEH_FRIENDLY,
-                          0, 0, you.pos(), you.pet_target)) != -1)
+    {
+        const int monster = create_monster(
+                                mgen_data(MONS_ABOMINATION_SMALL, BEH_FRIENDLY,
+                                          0, 0, you.pos(), you.pet_target,
+                                          MG_FORCE_BEH));
+        if (monster != -1)
         {
             mpr("A horrible Thing appears!");
+            player_angers_monster(&menv[monster]);
         }
         else
         {
@@ -4869,6 +4873,7 @@ void read_scroll(int slot)
             id_the_scroll = false;
         }
         break;
+    }
 
     case SCR_FOG:
         mpr("The scroll dissolves into smoke.");