ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/Deliantra-Client/bin/pclient
(Generate patch)

Comparing deliantra/Deliantra-Client/bin/pclient (file contents):
Revision 1.176 by root, Mon Apr 24 10:19:40 2006 UTC vs.
Revision 1.177 by root, Mon Apr 24 11:45:17 2006 UTC

36 36
37use CFClient; 37use CFClient;
38use CFClient::UI; 38use CFClient::UI;
39use CFClient::MapWidget; 39use CFClient::MapWidget;
40 40
41$SIG{__DIE__} = sub { CFClient::fatal "$_[0]"; exit 1 }; 41$Event::DIED = sub {
42 CFClient::error $_[1];
43};
42 44
43our $VERSION = '0.1'; 45our $VERSION = '0.1';
44 46
45my $MAX_FPS = 60; 47my $MAX_FPS = 60;
46my $MIN_FPS = 5; # unused as of yet 48my $MIN_FPS = 5; # unused as of yet
837 $BUTTONBAR->{children}[1]->emit ("activate"); # pop up server setup 839 $BUTTONBAR->{children}[1]->emit ("activate"); # pop up server setup
838} 840}
839 841
840sub video_shutdown { 842sub video_shutdown {
841 $CFClient::UI::ROOT->{children} = []; 843 $CFClient::UI::ROOT->{children} = [];
844 undef $CFClient::UI::GRAB;
845 undef $CFClient::UI::HOVER;
842 undef $SDL_ACTIVE; 846 undef $SDL_ACTIVE;
843} 847}
844 848
845my @bgmusic = qw(game1.ogg game2.ogg game3.ogg game5.ogg game6.ogg ross1.ogg ross2.ogg ross3.ogg ross4.ogg ross5.ogg); #d# 849my @bgmusic = qw(game1.ogg game2.ogg game3.ogg game5.ogg game6.ogg ross1.ogg ross2.ogg ross3.ogg ross4.ogg ross5.ogg); #d#
846my $bgmusic;#TODO#hack#d# 850my $bgmusic;#TODO#hack#d#

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines