| 1 | package DC::MapWidget; |
1 | package DC::MapWidget; |
| 2 | |
2 | |
| 3 | use strict; |
3 | use common::sense; |
| 4 | use utf8; |
|
|
| 5 | |
4 | |
| 6 | use List::Util qw(min max); |
5 | use List::Util qw(min max); |
| 7 | |
6 | |
| 8 | use DC; |
7 | use DC; |
| 9 | use DC::OpenGL; |
8 | use DC::OpenGL; |
| … | |
… | |
| 608 | $self->SUPER::DESTROY; |
607 | $self->SUPER::DESTROY; |
| 609 | } |
608 | } |
| 610 | |
609 | |
| 611 | package DC::MapWidget::MapMap; |
610 | package DC::MapWidget::MapMap; |
| 612 | |
611 | |
| 613 | use strict; |
612 | use common::sense; |
| 614 | use utf8; |
|
|
| 615 | |
613 | |
| 616 | our @ISA = DC::UI::Base::; |
614 | our @ISA = DC::UI::Base::; |
| 617 | |
615 | |
| 618 | use Time::HiRes qw(time); |
616 | use Time::HiRes qw(time); |
| 619 | use DC::OpenGL; |
617 | use DC::OpenGL; |
| … | |
… | |
| 713 | glDisable GL_BLEND; |
711 | glDisable GL_BLEND; |
| 714 | } |
712 | } |
| 715 | |
713 | |
| 716 | package DC::MapWidget::Command; |
714 | package DC::MapWidget::Command; |
| 717 | |
715 | |
| 718 | use strict; |
716 | use common::sense; |
| 719 | |
717 | |
| 720 | use DC::OpenGL; |
718 | use DC::OpenGL; |
| 721 | |
719 | |
| 722 | our @ISA = DC::UI::Frame::; |
720 | our @ISA = DC::UI::Frame::; |
| 723 | |
721 | |
