From 5deeeb89cb135941357ae71287642b4b4d0acd4d Mon Sep 17 00:00:00 2001
From: "nethack.allison" <nethack.allison>
Date: Sat, 4 Mar 2006 13:25:59 +0000
Subject: [PATCH] confused scroll of light follow-up (trunk only)

Provide an opportunity to name the scroll when known is not set
---
 src/read.c | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/src/read.c b/src/read.c
index ca11c8a27..173cdab05 100644
--- a/src/read.c
+++ b/src/read.c
@@ -1092,12 +1092,14 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
 	case SCR_LIGHT:
 		if (!confused || rn2(5)) {
 			if(!Blind) known = TRUE;
-			litroom(!confused && !sobj->cursed, sobj);
+			litroom(!confused && !scursed, sobj);
 		} else {
 		   /* could be scroll of create monster, don't set known ...*/
-		    (void) create_critters(1, !sobj->cursed ?
+		    (void) create_critters(1, !scursed ?
 				&mons[PM_YELLOW_LIGHT] :
 			        &mons[PM_BLACK_LIGHT], TRUE);
+		    if(!objects[sobj->otyp].oc_uname)
+			docall(sobj);
 		}
 		break;
 	case SCR_TELEPORTATION: