Fix B6013.

diff --git a/src/apply.c b/src/apply.c
index 123c1e7036e7170a669df0330935c5155eb41647..2dfc164e05182b95cf18a60efddddc20f6d0e302 100644 (file)
--- a/src/apply.c
+++ b/src/apply.c
@@ -1814,7 +1814,8 @@ struct obj *otmp;
        }
        material = objects[obj->otyp].oc_material;
 
-       if (otmp->cursed && obj->oclass == GEM_CLASS && !rn2(5)) {
+       if (otmp->cursed &&
+           obj->oclass == GEM_CLASS && !is_greystone(obj) && !rn2(5)) {
            pline(
                (Blind ? "You feel something shatter" :
                 (Hallucination ? "Oh, wow, look at the pretty shards." :