summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakTermServ53
1 files changed, 27 insertions, 26 deletions
diff --git a/perl-install/standalone/drakTermServ b/perl-install/standalone/drakTermServ
index 712e33452..a6cd5278b 100755
--- a/perl-install/standalone/drakTermServ
+++ b/perl-install/standalone/drakTermServ
@@ -260,66 +260,67 @@ sub interactive_mode() {
$main_box = new Gtk2::VBox(0,10),
),
0, $wizard_buttons = gtkpack_(new Gtk2::HBox(1,2)),
- 1, gtkpack_($main_buttons = new Gtk2::HBox(0,2),
- 0, gtkadd(gtkset_layout(Gtk2::VButtonBox->new, 'end'),
- gtksignal_connect(new Gtk2::Button(N("Enable Server")), clicked => sub {
+ 0, gtkpack_($main_buttons = new Gtk2::VBox(0,2),
+ 1, gtkpack_(new Gtk2::HBox(1,2),
+ 1, gtkpack_(new Gtk2::VBox(1,0),
+ 1, gtksignal_connect(new Gtk2::Button(N("Enable Server")), clicked => sub {
destroy_widget();
cursor_wait();
enable_ts();
cursor_norm();
}),
- gtksignal_connect(new Gtk2::Button(N("Disable Server")), clicked => sub {
+ 1, gtksignal_connect(new Gtk2::Button(N("Disable Server")), clicked => sub {
destroy_widget();
cursor_wait();
disable_ts();
cursor_norm();
}),
- ),
- 0, gtkadd(gtkset_layout(Gtk2::VButtonBox->new, 'end'),
- gtksignal_connect(new Gtk2::Button(N("Start Server")), clicked => sub {
+ ),
+ 1, gtkpack_(new Gtk2::VBox(1,0),
+ 1, gtksignal_connect(new Gtk2::Button(N("Start Server")), clicked => sub {
destroy_widget();
cursor_wait();
start_ts();
cursor_norm();
}),
- gtksignal_connect(new Gtk2::Button(N("Stop Server")), clicked => sub {
+ 1, gtksignal_connect(new Gtk2::Button(N("Stop Server")), clicked => sub {
destroy_widget();
cursor_wait();
stop_ts();
cursor_norm();
}),
- ),
- 0, gtkadd(gtkset_layout(Gtk2::VButtonBox->new, 'end'),
- gtksignal_connect(new Gtk2::Button(N("Etherboot Floppy/ISO")), clicked => sub {
+ ),
+ 1, gtkpack_(new Gtk2::VBox(1,0),
+ 1, gtksignal_connect(new Gtk2::Button(N("Etherboot Floppy/ISO")), clicked => sub {
destroy_widget();
make_boot();
}),
- gtksignal_connect(new Gtk2::Button(N("Net Boot Images")), clicked => sub {
+ 1, gtksignal_connect(new Gtk2::Button(N("Net Boot Images")), clicked => sub {
destroy_widget();
make_nbi();
}),
- ),
- 0, gtkadd(gtkset_layout(Gtk2::VButtonBox->new, 'end'),
- gtksignal_connect(new Gtk2::Button(N("Add/Del Users")), clicked => sub {
+ ),
+ 1, gtkpack_(new Gtk2::VBox(1,0),
+ 1, gtksignal_connect(new Gtk2::Button(N("Add/Del Users")), clicked => sub {
destroy_widget();
maintain_users();
}),
- gtksignal_connect(new Gtk2::Button(N("Add/Del Clients")), clicked => sub { destroy_widget(); maintain_clients() }),
- ),
- 1, new Gtk2::HBox(0,2),
- 0, gtkadd(gtkset_layout(Gtk2::VButtonBox->new, 'end'),
- gtksignal_connect(new Gtk2::Button(N("First Time Wizard")), clicked => sub {
- destroy_widget();
- start_wizard();
+ 1, gtksignal_connect(new Gtk2::Button(N("Add/Del Clients")), clicked => sub {
+ destroy_widget();
+ maintain_clients()
}),
- new Gtk2::VBox(0,0),
+ ),
),
- 0, gtkadd(gtkset_layout(Gtk2::VButtonBox->new, 'end'),
- gtksignal_connect(new Gtk2::Button(N("Help")),clicked => sub {
+ 1, gtkpack_(new Gtk2::HBox(1,2),
+ 0, gtksignal_connect(new Gtk2::Button(N("Help")),clicked => sub {
destroy_widget();
help();
}),
- gtksignal_connect(new Gtk2::Button(N("Close")), clicked => sub {
+ 0, gtksignal_connect(new Gtk2::Button(N("First Time Wizard")), clicked => sub {
+ destroy_widget();
+ start_wizard();
+ }),
+ 0, gtksignal_connect(new Gtk2::Button(N("Close")), clicked => sub {
write_conf_file();
restart_server() if $changes_made == 1;
Gtk2->main_quit;