From 86253d560220fcdb852abbb00dd750393d7806d5 Mon Sep 17 00:00:00 2001 From: cohrs Date: Sun, 13 Apr 2003 04:18:36 +0000 Subject: [PATCH] unpaid tinning kit usage reported that shopkeepers don't charge for using tinning kits. --- doc/fixes34.2 | 1 + src/apply.c | 1 + src/shk.c | 3 ++- 3 files changed, 4 insertions(+), 1 deletion(-) diff --git a/doc/fixes34.2 b/doc/fixes34.2 index 22a441fba..ba187712d 100644 --- a/doc/fixes34.2 +++ b/doc/fixes34.2 @@ -36,6 +36,7 @@ some Magicbane messages treated "erinys" as plural initialize artifacts before processing $WIZKIT clean up inconsistency between various places quaff is documented is_damageable was using is_rottable incorrectly +charge for use of an unpaid tinning kit Platform- and/or Interface-Specific Fixes diff --git a/src/apply.c b/src/apply.c index 3b6b45bee..e4b7c0071 100644 --- a/src/apply.c +++ b/src/apply.c @@ -1408,6 +1408,7 @@ register struct obj *obj; pline("That's too insubstantial to tin."); return; } + check_unpaid(obj); obj->spe--; if ((can = mksobj(TIN, FALSE, FALSE)) != 0) { static const char you_buy_it[] = "You tin it, you bought it!"; diff --git a/src/shk.c b/src/shk.c index 2c0ac27c2..b70180f03 100644 --- a/src/shk.c +++ b/src/shk.c @@ -3849,7 +3849,8 @@ boolean altusage; /* some items have an "alternate" use with different cost */ if (otmp->spe > 1) tmp /= 4L; } else if (otmp->oclass == SPBOOK_CLASS) { tmp -= tmp / 5L; - } else if (otmp->otyp == CAN_OF_GREASE + } else if (otmp->otyp == CAN_OF_GREASE || + otmp->otyp == TINNING_KIT #ifdef TOURIST || otmp->otyp == EXPENSIVE_CAMERA #endif -- 2.40.0