… | |
… | |
245 | if (!wall) |
245 | if (!wall) |
246 | /* Nothing -> bail out */ |
246 | /* Nothing -> bail out */ |
247 | return; |
247 | return; |
248 | |
248 | |
249 | /* Find base name */ |
249 | /* Find base name */ |
250 | strcpy (archetype, wall->arch->name); |
250 | assign (archetype, wall->arch->name); |
251 | underscore = strchr (archetype, '_'); |
251 | underscore = strchr (archetype, '_'); |
252 | |
252 | |
253 | /* search for the first _ before a number */ |
253 | /* search for the first _ before a number */ |
254 | while (underscore && !isdigit (*(underscore + 1))) |
254 | while (underscore && !isdigit (*(underscore + 1))) |
255 | underscore = strchr (underscore + 1, '_'); |
255 | underscore = strchr (underscore + 1, '_'); |