small touchstone credit

diff --git a/src/apply.c b/src/apply.c
index 3ddc990b96e0c61de0c1c7599fd64a0260efb0c9..874276d6d945ddf5d53d6f951a9cdb9e74fdd665 100644 (file)
--- a/src/apply.c
+++ b/src/apply.c
@@ -1761,6 +1761,7 @@ reset_trapset()
        trapinfo.tobj = 0;
 }
 
+/* touchstones - by Ken Arnold */
 STATIC_OVL void
 use_stone(otmp)
 struct obj *otmp;