summaryrefslogtreecommitdiffstats
path: root/perl-install/my_gtk.pm
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-02-23 15:26:57 +0000
committerdamien <damien@mandriva.com>2001-02-23 15:26:57 +0000
commit8fadbcbceabe95733503a7c119424621eb680a0f (patch)
tree60150c99d0f47e1eb5bc92811e91ac2cf912cd7e /perl-install/my_gtk.pm
parent1401df1a732d50b4940f4b7d6207d223bda301bd (diff)
downloaddrakx-backup-do-not-use-8fadbcbceabe95733503a7c119424621eb680a0f.tar
drakx-backup-do-not-use-8fadbcbceabe95733503a7c119424621eb680a0f.tar.gz
drakx-backup-do-not-use-8fadbcbceabe95733503a7c119424621eb680a0f.tar.bz2
drakx-backup-do-not-use-8fadbcbceabe95733503a7c119424621eb680a0f.tar.xz
drakx-backup-do-not-use-8fadbcbceabe95733503a7c119424621eb680a0f.zip
new wizard layout, no use gtk in draknet, minor bugfixes
Diffstat (limited to 'perl-install/my_gtk.pm')
-rw-r--r--perl-install/my_gtk.pm9
1 files changed, 3 insertions, 6 deletions
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm
index a387c83a8..0570e3d81 100644
--- a/perl-install/my_gtk.pm
+++ b/perl-install/my_gtk.pm
@@ -56,14 +56,11 @@ sub new {
$::WizardTable = new Gtk::Table(2, 2, 0);
$::WizardWindow->add($::WizardTable);
my $draw1 = new Gtk::DrawingArea;
- $draw1->set_usize(50,50);
+ $draw1->set_usize(400,100);
my $draw2 = new Gtk::DrawingArea;
- $draw1->set_usize(50,50);
- my $draw3 = new Gtk::DrawingArea;
- $draw1->set_usize(50,50);
- $::WizardTable->attach($draw1, 0, 1, 0, 1, 'fill', 'fill', 0, 0);
+ $draw2->set_usize(100,200);
+ $::WizardTable->attach($draw1, 0, 2, 0, 1, 'fill', 'fill', 0, 0);
$::WizardTable->attach($draw2, 0, 1, 1, 2, 'fill', 'fill', 0, 0);
- $::WizardTable->attach($draw3, 1, 2, 0, 1, 'fill', 'fill', 0, 0);
$::WizardWindow->show_all;
flush();
}