… | |
… | |
1253 | /* set creature race to race value */ |
1253 | /* set creature race to race value */ |
1254 | if ((mon = archetype::find (cp)) == NULL) |
1254 | if ((mon = archetype::find (cp)) == NULL) |
1255 | LOG (llevError, "Creature %s in race file lacks archetype\n", cp); |
1255 | LOG (llevError, "Creature %s in race file lacks archetype\n", cp); |
1256 | else |
1256 | else |
1257 | { |
1257 | { |
1258 | if (set_race && (!mon->clone.race || strcmp (mon->clone.race, race))) |
1258 | if (set_race && (!mon->race || strcmp (mon->race, race))) |
1259 | { |
1259 | { |
1260 | if (mon->clone.race) |
1260 | if (mon->race) |
1261 | LOG (llevDebug, "Resetting race to %s from %s for archetype %s\n", race, &mon->clone.race, &mon->archname); |
1261 | LOG (llevDebug, "Resetting race to %s from %s for archetype %s\n", race, &mon->race, &mon->archname); |
1262 | |
1262 | |
1263 | mon->clone.race = race; |
1263 | mon->race = race; |
1264 | } |
1264 | } |
1265 | |
1265 | |
1266 | /* if the arch is a monster, add it to the race list */ |
1266 | /* if the arch is a monster, add it to the race list */ |
1267 | if (set_list && QUERY_FLAG (&mon->clone, FLAG_MONSTER)) |
1267 | if (set_list && QUERY_FLAG (mon, FLAG_MONSTER)) |
1268 | add_to_racelist (race, &mon->clone); |
1268 | add_to_racelist (race, mon); |
1269 | } |
1269 | } |
1270 | } |
1270 | } |
1271 | } |
1271 | } |
1272 | |
1272 | |
1273 | fclose (file); |
1273 | fclose (file); |