From ca7de91dc66ebf9c42d203d525951b20cc4d3a77 Mon Sep 17 00:00:00 2001
From: cohrs <cohrs>
Date: Wed, 6 Feb 2002 05:57:02 +0000
Subject: [PATCH] discovering identify and fire scrolls reading one of these
 for the first time should give experience, like other scrolls

---
 src/read.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/read.c b/src/read.c
index dc2cbd8fd..a26ec694b 100644
--- a/src/read.c
+++ b/src/read.c
@@ -1022,6 +1022,7 @@ register struct obj	*sobj;
 			/* Note: if rn2(5)==0, identify all items */
 			if (cval == 1 && sobj->blessed && Luck > 0) ++cval;
 		} else	cval = 1;
+		if(!objects[sobj->otyp].oc_name_known) more_experienced(0,10);
 		useup(sobj);
 		makeknown(SCR_IDENTIFY);
 	id:
@@ -1100,6 +1101,7 @@ register struct obj	*sobj;
 		 * some damage under all potential cases.
 		 */
 		cval = bcsign(sobj);
+		if(!objects[sobj->otyp].oc_name_known) more_experienced(0,10);
 		useup(sobj);
 		makeknown(SCR_FIRE);
 		if(confused) {