summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2002-03-08 18:24:54 +0000
committerdamien <damien@mandriva.com>2002-03-08 18:24:54 +0000
commit39cf77e7043170938dbd582c0809e9c0b4ba93d6 (patch)
treee4b59bf0a9f4054758119c8259f0a517af00e144 /perl-install/standalone
parentbf324aa6febe3b24aedab1766fda496752ac83e0 (diff)
downloaddrakx-backup-do-not-use-39cf77e7043170938dbd582c0809e9c0b4ba93d6.tar
drakx-backup-do-not-use-39cf77e7043170938dbd582c0809e9c0b4ba93d6.tar.gz
drakx-backup-do-not-use-39cf77e7043170938dbd582c0809e9c0b4ba93d6.tar.bz2
drakx-backup-do-not-use-39cf77e7043170938dbd582c0809e9c0b4ba93d6.tar.xz
drakx-backup-do-not-use-39cf77e7043170938dbd582c0809e9c0b4ba93d6.zip
ergonomy changed to fit in mcc
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/drakfont64
1 files changed, 38 insertions, 26 deletions
diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index 9caf0cac4..07e20d42e 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -550,38 +550,50 @@ sub interactive_mode {
my ($pix_u_map, $pix_u_mask) = gtkcreate_png("drakfont.620x57");
gtkadd($window1,
- gtkpack_(gtkset_usize(new Gtk::VBox(0,2),,620, 390),
+ gtkpack_(new Gtk::VBox(0,2),
if_(!$::isEmbedded, 0, new Gtk::Pixmap($pix_u_map, $pix_u_mask)),
1, gtkpack_(new Gtk::HBox(0,2),
1, gtkpack_(new Gtk::VBox(0,2),
1, gtkpack($font_box = new Gtk::VBox(0,5),
$font_sel = new Gtk::FontSelection,
),
- 0, gtkadd(gtkset_layout(new Gtk::VButtonBox, -end),
- gtksignal_connect(new Gtk::Button(_("Get Windows Fonts")), clicked =>
- sub { ${$central_widget}->destroy(); $windows = 1; appli_choice();}),
- gtksignal_connect(new Gtk::Button(_("Advanced Options")), clicked =>
- sub { ${$central_widget}->destroy(); $windows = 0; advanced_install();}),
- gtksignal_connect(new Gtk::Button(_("Uninstall Fonts")), clicked =>
- sub { ${$central_widget}->destroy(); uninstall() }),
- gtksignal_connect(new Gtk::Button(_("Font List")), clicked =>
- sub { ${$central_widget}->destroy(); create_fontsel()}),
- ),
- ),
- 0, gtkpack_(new Gtk::VBox(0,5),
- 0, new Gtk::VBox(0,0),
- 0, new Gtk::Pixmap($pix_user_map, $pix_user_mask),
- 1, new Gtk::VBox(0,0),
- 1, gtkadd(gtkset_layout(new Gtk::VButtonBox, -end),
- gtksignal_connect(new Gtk::Button(_("About")), clicked => sub {
- ${$central_widget}->destroy(); about() }),
- gtksignal_connect(new Gtk::Button(_(" Help ")), clicked => sub {
- ${$central_widget}->destroy(); help() }),
- gtksignal_connect(new Gtk::Button(_("Close")), clicked => sub {
- $::isEmbedded and kill USR1, $::CCPID;
- Gtk->main_quit() }),
- ),
- )
+ 1, gtkpack_(new Gtk::HBox(0,2),
+ 0, gtkadd(gtkset_layout(new Gtk::VButtonBox, -spread),
+ gtksignal_connect(new Gtk::Button(_("Get Windows Fonts")), clicked =>
+ sub { ${$central_widget}->destroy(); $windows = 1; appli_choice();}),
+ gtksignal_connect(new Gtk::Button(_("Uninstall Fonts")), clicked =>
+ sub { ${$central_widget}->destroy(); uninstall() }),
+ ),
+ 0, gtkadd(gtkset_layout(new Gtk::VButtonBox, -spread),
+ gtksignal_connect(new Gtk::Button(_("Advanced Options")), clicked =>
+ sub { ${$central_widget}->destroy(); $windows = 0; advanced_install();}),
+ gtksignal_connect(new Gtk::Button(_("Font List")), clicked =>
+ sub { ${$central_widget}->destroy(); create_fontsel()}),
+ ),
+ 1, new Gtk::HBox(0,2),
+ 0, gtkadd(gtkset_layout(new Gtk::VButtonBox, -spread),
+ gtksignal_connect(new Gtk::Button(_("Help")),clicked =>
+ sub { ${$central_widget}->destroy(); help() }),
+ gtksignal_connect(new Gtk::Button(_("Close")), clicked => sub {
+ $::isEmbedded and kill USR1, $::CCPID;
+ Gtk->main_quit() }),
+ ),
+ ),
+ ),
+# 0, gtkpack_(new Gtk::VBox(0,5),
+# 0, new Gtk::VBox(0,0),
+# 0, new Gtk::Pixmap($pix_user_map, $pix_user_mask),
+# 1, new Gtk::VBox(0,0),
+# 1, gtkadd(gtkset_layout(new Gtk::VButtonBox, -end),
+# gtksignal_connect(new Gtk::Button(_("About")), clicked => sub {
+# ${$central_widget}->destroy(); about() }),
+# gtksignal_connect(new Gtk::Button(_(" Help ")), clicked => sub {
+# ${$central_widget}->destroy(); help() }),
+# gtksignal_connect(new Gtk::Button(_("Close")), clicked => sub {
+# $::isEmbedded and kill USR1, $::CCPID;
+# Gtk->main_quit() }),
+# ),
+# )
),
),
);