ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/Deliantra-Client/DC/MapWidget.pm
(Generate patch)

Comparing deliantra/Deliantra-Client/DC/MapWidget.pm (file contents):
Revision 1.160 by root, Tue Dec 22 01:37:41 2009 UTC vs.
Revision 1.162 by root, Sat Apr 3 02:58:25 2010 UTC

1package DC::MapWidget; 1package DC::MapWidget;
2 2
3use strict; 3use common::sense;
4use utf8;
5 4
6use List::Util qw(min max); 5use List::Util qw(min max);
7 6
8use DC; 7use DC;
9use DC::OpenGL; 8use DC::OpenGL;
214# push @items, [ 213# push @items, [
215# "Edit this map <span size='xx-small'>(" . (DC::asxml $::CONN->{map_info}[0]) . ")</span>", 214# "Edit this map <span size='xx-small'>(" . (DC::asxml $::CONN->{map_info}[0]) . ")</span>",
216# \&editor_invoke, 215# \&editor_invoke,
217# ]; 216# ];
218 217
219 for my $type (qw(test name)) { 218 for my $type (@{ $::CONN->{editor_support}{servertypes} }) {
220 $::CONN->{editor_support}{type} ne $type 219 $::CONN->{editor_support}{servertype} ne $type
221 or next; 220 or next;
222 my $server = $::CONN->{editor_support}{"${type}server"} 221 my $server = $::CONN->{editor_support}{"${type}server"}
223 or next; 222 or next;
224 223
225 push @items, [ 224 push @items, [
608 $self->SUPER::DESTROY; 607 $self->SUPER::DESTROY;
609} 608}
610 609
611package DC::MapWidget::MapMap; 610package DC::MapWidget::MapMap;
612 611
613use strict; 612use common::sense;
614use utf8;
615 613
616our @ISA = DC::UI::Base::; 614our @ISA = DC::UI::Base::;
617 615
618use Time::HiRes qw(time); 616use Time::HiRes qw(time);
619use DC::OpenGL; 617use DC::OpenGL;
713 glDisable GL_BLEND; 711 glDisable GL_BLEND;
714} 712}
715 713
716package DC::MapWidget::Command; 714package DC::MapWidget::Command;
717 715
718use strict; 716use common::sense;
719 717
720use DC::OpenGL; 718use DC::OpenGL;
721 719
722our @ISA = DC::UI::Frame::; 720our @ISA = DC::UI::Frame::;
723 721

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines