… | |
… | |
858 | |
858 | |
859 | $BUTTONBAR->add (new CFClient::UI::Flopper text => "Client Setup", other => client_setup); |
859 | $BUTTONBAR->add (new CFClient::UI::Flopper text => "Client Setup", other => client_setup); |
860 | $BUTTONBAR->add (new CFClient::UI::Flopper text => "Server Setup", other => server_setup); |
860 | $BUTTONBAR->add (new CFClient::UI::Flopper text => "Server Setup", other => server_setup); |
861 | $BUTTONBAR->add (new CFClient::UI::Flopper text => "Message Window", other => message_window); |
861 | $BUTTONBAR->add (new CFClient::UI::Flopper text => "Message Window", other => message_window); |
862 | |
862 | |
863 | $CFClient::UI::ROOT->add (make_gauge_window); # 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 |
863 | 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 |
|
|
864 | |
864 | $BUTTONBAR->add (new CFClient::UI::Flopper text => "Stats Window", other => make_stats_window); |
865 | $BUTTONBAR->add (new CFClient::UI::Flopper text => "Stats Window", other => make_stats_window); |
865 | $BUTTONBAR->add (new CFClient::UI::Flopper text => "Inventory", other => make_inventory_window); |
866 | $BUTTONBAR->add (new CFClient::UI::Flopper text => "Inventory", other => make_inventory_window); |
866 | |
867 | |
867 | $BUTTONBAR->add (new CFClient::UI::Button text => "Save Config", connect_activate => sub { |
868 | $BUTTONBAR->add (new CFClient::UI::Button text => "Save Config", connect_activate => sub { |
868 | CFClient::write_cfg "$Crossfire::VARDIR/pclientrc"; |
869 | CFClient::write_cfg "$Crossfire::VARDIR/pclientrc"; |