do shopkeeper specific structure munging -dlc */
| 287 | |
| 288 | /* do shopkeeper specific structure munging -dlc */ |
| 289 | void |
| 290 | restshk(struct monst *shkp, boolean ghostly) |
| 291 | { |
| 292 | if (u.uz.dlevel) { |
| 293 | struct eshk *eshkp = ESHK(shkp); |
| 294 | |
| 295 | if (eshkp->bill_p != (struct bill_x *) -1000) |
| 296 | eshkp->bill_p = &eshkp->bill[0]; |
| 297 | /* shoplevel can change as dungeons move around */ |
| 298 | /* savebones guarantees that non-homed shk's will be gone */ |
| 299 | if (ghostly) { |
| 300 | assign_level(&eshkp->shoplevel, &u.uz); |
| 301 | if (ANGRY(shkp) && strncmpi(eshkp->customer, svp.plname, PL_NSIZ)) |
| 302 | pacify_shk(shkp, TRUE); |
| 303 | } |
| 304 | } |
| 305 | } |
| 306 | |
| 307 | /* clear the unpaid bit on a single object and its contents */ |
| 308 | staticfn void |
no test coverage detected