diff --git a/src/lib/subs/supply.c b/src/lib/subs/supply.c
index 9b413ccf..020d19d7 100644
--- a/src/lib/subs/supply.c
+++ b/src/lib/subs/supply.c
@@ -83,11 +83,8 @@ void
 resupply_commod(struct lndstr *lp, i_type type)
 {
     int amt;
-    struct lchrstr *lcp;
     struct shpstr ship;
 
-    lcp = &lchr[(int)lp->lnd_type];
-
     /* Ok, do we now have enough? */
     amt = get_minimum(lp, type) - lp->lnd_item[type];
     if (amt > 0) {
@@ -482,13 +479,10 @@ get_minimum(struct lndstr *lp, i_type type)
 int
 has_supply(struct lndstr *lp)
 {
-    struct lchrstr *lcp;
     int shells_needed, shells, keepshells;
     int food, food_needed, keepfood;
     int fuel_needed, fuel, petrol_needed, petrol, keeppetrol;
 
-    lcp = &lchr[(int)lp->lnd_type];
-
     if (!opt_NOFOOD) {
 	food_needed = get_minimum(lp, I_FOOD);
 	food = keepfood = lp->lnd_item[I_FOOD];
@@ -549,12 +543,9 @@ has_supply(struct lndstr *lp)
 int
 use_supply(struct lndstr *lp)
 {
-    struct lchrstr *lcp;
     int shells_needed, shells, food, food_needed;
     int fuel_needed, fuel, petrol_needed, petrol;
 
-    lcp = &lchr[(int)lp->lnd_type];
-
     shells_needed = lp->lnd_ammo;
     shells = lp->lnd_item[I_SHELL];
     if (shells < shells_needed) {