From 38e60fa8d19902b92893e43420e1eef8a0401dd2 Mon Sep 17 00:00:00 2001
From: arromdee <arromdee>
Date: Sat, 2 Mar 2002 16:46:56 +0000
Subject: [PATCH] jeweler shopkeeper touchstone (B3015) This implements the
 suggestion in beta bug 3015.

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

diff --git a/src/shknam.c b/src/shknam.c
index 8405600a4..59a05cdcf 100644
--- a/src/shknam.c
+++ b/src/shknam.c
@@ -411,6 +411,8 @@ struct mkroom	*sroom;
 #else
         mkmonmoney(shk, 1000L + 30L*(long)rnd(100));	/* initial capital */
 #endif
+	if (shp->shknms == shkrings)
+	    (void) mongets(shk, TOUCHSTONE);
 	nameshk(shk, shp->shknms);
 
 	return(sh);