(deliver): Grant packing bonus only to efficient sectors, as

everywhere else.

diff --git a/src/lib/update/deliver.c b/src/lib/update/deliver.c
index cf93745fd53c334d4228c2364cc47a0a5bdfcea7..25a90498c9738c87ea7efa754b6c7bc5d8ad3ff9 100644 (file)
--- a/src/lib/update/deliver.c
+++ b/src/lib/update/deliver.c
@@ -78,7 +78,7 @@ deliver(register struct sctstr *from, struct ichrstr *ip, int dir,
     }
     dp = &dchr[from->sct_type];
     vtype = ip->i_vtype;
-    pack_src = ip->i_pkg[dp->d_pkg];
+    pack_src = ip->i_pkg[from->sct_effic >= 60 ? dp->d_pkg : NPKG];
     mobility = from->sct_mobil / 2;
     if (vtype == I_CIVIL && from->sct_own != from->sct_oldown) {
        wu(0, from->sct_own,