… | … | ||
---|---|---|---|
511 | my ($self) = @_; | 511 | my ($self) = @_; |
512 | 512 | ||
513 | $MAP->clear; | 513 | $MAP->clear; |
514 | 514 | ||
515 | # refresh; | 515 | # refresh; |
516 | } | ||
517 | |||
518 | sub conn::map_info { | ||
519 | my ($self, $mode, $x, $y, $w, $h, $hash) = @_; | ||
520 | |||
521 | warn "mapinfo <$mode,$x,$y,$w,$h,$hash>\n";#d# | ||
516 | } | 522 | } |
517 | 523 | ||
518 | sub conn::face_find { | 524 | sub conn::face_find { |
519 | my ($self, $face) = @_; | 525 | my ($self, $face) = @_; |
520 | 526 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |