| … | |
… | |
| 174 | } |
174 | } |
| 175 | } |
175 | } |
| 176 | |
176 | |
| 177 | sub stop_game { |
177 | sub stop_game { |
| 178 | $LOGIN_BUTTON->set_text ("Login"); |
178 | $LOGIN_BUTTON->set_text ("Login"); |
|
|
179 | $SETUP_NOTEBOOK->set_current_page ($SETUP_SERVER); |
| 179 | $SETUP_DIALOG->show; |
180 | $SETUP_DIALOG->show; |
| 180 | $INV_WINDOW->hide; |
181 | $INV_WINDOW->hide; |
| 181 | $LOGVIEW->hide; |
|
|
| 182 | |
182 | |
| 183 | return unless $CONN; |
183 | return unless $CONN; |
| 184 | |
184 | |
| 185 | status "connection closed"; |
185 | status "connection closed"; |
| 186 | |
186 | |
| … | |
… | |
| 1100 | $SETUP_DIALOG->show; |
1100 | $SETUP_DIALOG->show; |
| 1101 | }, |
1101 | }, |
| 1102 | sub { |
1102 | sub { |
| 1103 | $SETUP_NOTEBOOK->set_current_page ($SETUP_KEYBOARD); |
1103 | $SETUP_NOTEBOOK->set_current_page ($SETUP_KEYBOARD); |
| 1104 | $SETUP_DIALOG->show; |
1104 | $SETUP_DIALOG->show; |
| 1105 | }); |
1105 | }, |
|
|
1106 | ); |
| 1106 | $SETUP_DIALOG->hide; |
1107 | $SETUP_DIALOG->hide; |
| 1107 | $::BIND_EDITOR->show; |
1108 | $::BIND_EDITOR->show; |
| 1108 | }, |
1109 | }, |
| 1109 | ); |
1110 | ); |
| 1110 | |
1111 | |
| … | |
… | |
| 1259 | $SETUP_DIALOG = new CFClient::UI::FancyFrame |
1260 | $SETUP_DIALOG = new CFClient::UI::FancyFrame |
| 1260 | title => "Setup", |
1261 | title => "Setup", |
| 1261 | name => "setup_dialog", |
1262 | name => "setup_dialog", |
| 1262 | x => 'center', |
1263 | x => 'center', |
| 1263 | y => 'center', |
1264 | y => 'center', |
|
|
1265 | z => 2, |
| 1264 | force_w => $::WIDTH * 0.6, |
1266 | force_w => $::WIDTH * 0.6, |
| 1265 | force_h => $::HEIGHT * 0.6, |
1267 | force_h => $::HEIGHT * 0.6, |
| 1266 | ; |
1268 | ; |
| 1267 | |
1269 | |
| 1268 | $SETUP_DIALOG->add ($SETUP_NOTEBOOK = new CFClient::UI::Notebook expand => 1, debug => 1, |
1270 | $SETUP_DIALOG->add ($SETUP_NOTEBOOK = new CFClient::UI::Notebook expand => 1, debug => 1, |
