From 61fb648a8852e87f48c6ce480f3f9327dfa9fcf7 Mon Sep 17 00:00:00 2001
From: "John \"Elwin\" Edwards" <elwin@rlgallery.org>
Date: Tue, 7 Dec 2010 22:31:33 +0000
Subject: [PATCH] srogue: prevent aquiring unlimited scrolls of aquirement.

---
 srogue/wizard.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/srogue/wizard.c b/srogue/wizard.c
index 4027c87..6c0a52f 100644
--- a/srogue/wizard.c
+++ b/srogue/wizard.c
@@ -231,6 +231,10 @@ bool fscr;
 		else
 			resoflg(obj, ISCURSED);
 	}
+	/* Don't let scrolls of aquirement give multiple scrolls of 
+	 * aquirement, or you will be able to scum for ANYTHING. */
+	if (!wizard && wh == SCROLL && obj->o_which == S_MAKEIT)
+		obj->o_count = 1;
 	mpos = 0;
 	if (fscr)
 		whatis(item);			/* identify for aquirement scroll */