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

Comparing deliantra/Deliantra-Client/bin/cfplus (file contents):
Revision 1.40 by root, Fri Jun 2 02:12:04 2006 UTC vs.
Revision 1.41 by root, Fri Jun 2 02:21:48 2006 UTC

710} 710}
711 711
712sub metaserver_dialog { 712sub metaserver_dialog {
713 my $dialog = new CFClient::UI::FancyFrame 713 my $dialog = new CFClient::UI::FancyFrame
714 title => "Server List", 714 title => "Server List",
715 name => 'metaserver_dialog',
715 x => 'center', 716 x => 'center',
716 y => 'center', 717 y => 'center',
717 child => (my $vbox = new CFClient::UI::VBox), 718 child => (my $vbox = new CFClient::UI::VBox),
718 on_visibility_change => sub { 719 on_visibility_change => sub {
719 update_metaserver if $_[1]; 720 update_metaserver if $_[1];
1060 $BIND_WINDOW 1061 $BIND_WINDOW
1061} 1062}
1062 1063
1063sub make_help_window { 1064sub make_help_window {
1064 my $win = new CFClient::UI::FancyFrame 1065 my $win = new CFClient::UI::FancyFrame
1066 x => 'center',
1067 y => 'center',
1068 name => 'doc_browser',
1065 def_w => int $WIDTH * 7/8, 1069 force_w => int $WIDTH * 7/8,
1066 def_h => int $HEIGHT * 7/8, 1070 force_h => int $HEIGHT * 7/8,
1067 title => "Documentation"; 1071 title => "Documentation";
1068 1072
1069 $win->add (my $vbox = new CFClient::UI::VBox); 1073 $win->add (my $vbox = new CFClient::UI::VBox);
1070 1074
1071 $vbox->add (my $buttons = new CFClient::UI::HBox); 1075 $vbox->add (my $buttons = new CFClient::UI::HBox);
1072 $vbox->add (my $viewer = new CFClient::UI::TextView expand => 1, fontsize => 0.8); 1076 $vbox->add (my $viewer = new CFClient::UI::TextView expand => 1, fontsize => 0.8);

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines