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.34 by elmex, Tue May 30 14:35:09 2006 UTC vs.
Revision 1.36 by elmex, Tue May 30 14:59:26 2006 UTC

1012 my ($self, $visible) = @_; 1012 my ($self, $visible) = @_;
1013 $refresh->() if $visible; 1013 $refresh->() if $visible;
1014 }; 1014 };
1015 1015
1016 $BIND_WINDOW->add (my $vb = new CFClient::UI::VBox); 1016 $BIND_WINDOW->add (my $vb = new CFClient::UI::VBox);
1017 $vb->add ($binding_list);
1018 $vb->add (my $hb = new CFClient::UI::HBox);
1017 $vb->add (new CFClient::UI::Button 1019 $hb->add (new CFClient::UI::Button
1018 text => "record new", 1020 text => "record new",
1021 expand => 1,
1019 tooltip => "This button opens the binding editor with an empty binding.", 1022 tooltip => "This button opens the binding editor with an empty binding.",
1020 on_activate => sub { 1023 on_activate => sub {
1021 $::BIND_EDITOR->set_binding (undef, undef, [], 1024 $::BIND_EDITOR->set_binding (undef, undef, [],
1022 sub { 1025 sub {
1023 my ($mod, $sym, $cmds) = @_; 1026 my ($mod, $sym, $cmds) = @_;
1030 }); 1033 });
1031 $::BIND_WINDOW->hide; 1034 $::BIND_WINDOW->hide;
1032 $::BIND_EDITOR->show; 1035 $::BIND_EDITOR->show;
1033 }, 1036 },
1034 ); 1037 );
1035 $vb->add ($binding_list); 1038 $hb->add (new CFClient::UI::Button
1039 text => "close",
1040 tooltip => "Closes the binding window",
1041 expand => 1,
1042 on_activate => sub {
1043 $::BIND_WINDOW->hide;
1044 }
1045 );
1046
1036 $refresh->(); 1047 $refresh->();
1037 $BIND_WINDOW 1048 $BIND_WINDOW
1038} 1049}
1039 1050
1040sub make_help_window { 1051sub make_help_window {
1178 make_gauge_window->show; # XXX: this has to be set before make_stats_window as make_stats_window calls update_stats_window which updated the gauges also X-D 1189 make_gauge_window->show; # XXX: this has to be set before make_stats_window as make_stats_window calls update_stats_window which updated the gauges also X-D
1179 1190
1180 $BUTTONBAR->add (new CFClient::UI::Flopper text => "Stats Window", other => make_stats_window, 1191 $BUTTONBAR->add (new CFClient::UI::Flopper text => "Stats Window", other => make_stats_window,
1181 tooltip => "Toggles the statistics window, where all your Stats and Resistances are being displayed at all times."); 1192 tooltip => "Toggles the statistics window, where all your Stats and Resistances are being displayed at all times.");
1182 $BUTTONBAR->add (new CFClient::UI::Flopper text => "Inventory", other => make_inventory_window, 1193 $BUTTONBAR->add (new CFClient::UI::Flopper text => "Inventory", other => make_inventory_window,
1183 tooltip => "Toggles the inventory window, where you can manage your loot (or treaures :)."); 1194 tooltip => "Toggles the inventory window, where you can manage your loot (or treaures :)."
1195 ."You can also hit the Tab-key to show/hide the Inventory.");
1184 1196
1185 $BUTTONBAR->add (new CFClient::UI::Button 1197 $BUTTONBAR->add (new CFClient::UI::Button
1186 text => "Save Config", 1198 text => "Save Config",
1187 tooltip => "Saves the options chosen in the client setting, server settings and the window layout to be restored on later runs.", 1199 tooltip => "Saves the options chosen in the client setting, server settings and the window layout to be restored on later runs.",
1188 on_activate => sub { 1200 on_activate => sub {
1196 tooltip => "View Documentation"); 1208 tooltip => "View Documentation");
1197 1209
1198 $BUTTONBAR->add (new CFClient::UI::Flopper 1210 $BUTTONBAR->add (new CFClient::UI::Flopper
1199 text => "Bindings", 1211 text => "Bindings",
1200 other => make_binding_window, 1212 other => make_binding_window,
1201 tooltip => "Lets you delete bindings you have made with the recorder" 1213 tooltip =>
1214 "Lets you define, edit and delete bindings."
1215 ."There is a shortcut for making bindings: LCTRL+Insert opens the binding editor "
1216 ."with nothing set and the recording started. After doing the actions you "
1217 ."want to record press Insert and you will be asked to press a key-combo."
1218 ."After pressing the combo the binding will be saved automatically and the "
1219 ."binding editor closes"
1202 ); 1220 );
1203 1221
1204 $BUTTONBAR->add (new CFClient::UI::Button 1222 $BUTTONBAR->add (new CFClient::UI::Button
1205 text => "Quit", 1223 text => "Quit",
1206 tooltip => "Terminates the program", 1224 tooltip => "Terminates the program",

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines