… | … | ||
---|---|---|---|
165 | # warn $stem; | 165 | # warn $stem; |
166 | "+" | 166 | "+" |
167 | } elsif ($stem =~ /^floor\/|^ground\/|Nimfloor/) { | 167 | } elsif ($stem =~ /^floor\/|^ground\/|Nimfloor/) { |
168 | "." | 168 | "." |
169 | } elsif ($stem =~ /^player\//) { | 169 | } elsif ($stem =~ /^player\//) { |
170 | "@" | 170 | "\@" |
171 | } else { | 171 | } else { |
172 | substr $stem, 0, 1 | 172 | substr $stem, 0, 1 |
173 | } | 173 | } |
174 | } | 174 | } |
175 | 175 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |