nethack-gwaa-kiwi/nethack
1
0
Fork 0
Code Pull Requests Activity

cloning

Browse Source 
Fix a minor cloning problem; clones didn't retain the monster's name or
tameness.  (The name *was* retained if you were cloned.)  I also added a
minor change in wizard mode to display a few tameness fields of a dog.
This commit is contained in:
arromdee
2002-02-26 06:55:17 +00:00
parent 2272e70d39
commit af51f4b0a2
3 changed files with 15 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/makemon.c
View File

@@ -713,11 +713,14 @@ struct monst *mon;
if (mon->isgd) m2->isgd = FALSE;
if (mon->ispriest) m2->ispriest = FALSE;
m2->mxlth = 0;
m2->mnamelth = 0;
place_monster(m2, m2->mx, m2->my);
if (emits_light(m2->data))
new_light_source(m2->mx, m2->my, emits_light(m2->data),
LS_MONSTER, (genericptr_t)m2);
if (m2->mnamelth) {
m2->mnamelth = 0; /* or it won't get allocated */
m2 = christen_monst(m2, NAME(mon));
}
newsym(m2->mx,m2->my); /* display the new monster */
if (mon->mtame) {
struct monst *m3;
@@ -727,8 +730,10 @@ struct monst *mon;
* must be made non-tame to get initialized properly.
*/
m2->mtame = 0;
if ((m3 = tamedog(m2, (struct obj *)0)) != 0)
if ((m3 = tamedog(m2, (struct obj *)0)) != 0) {
m2 = m3;
*(EDOG(m2)) = *(EDOG(mon));
}
}
return m2;
}