diff options
author | Francois Pons <fpons@mandriva.com> | 2001-12-18 16:07:24 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2001-12-18 16:07:24 +0000 |
commit | 6a424290f57518558a6cc3f7fa6b6f2d8c91f52a (patch) | |
tree | 450181f957c8682bb456d01205a651fe1727a381 /perl-install | |
parent | 43a9284c3e65b81cab357e7f0c2e2761bc9d4526 (diff) | |
download | drakx-6a424290f57518558a6cc3f7fa6b6f2d8c91f52a.tar drakx-6a424290f57518558a6cc3f7fa6b6f2d8c91f52a.tar.gz drakx-6a424290f57518558a6cc3f7fa6b6f2d8c91f52a.tar.bz2 drakx-6a424290f57518558a6cc3f7fa6b6f2d8c91f52a.tar.xz drakx-6a424290f57518558a6cc3f7fa6b6f2d8c91f52a.zip |
fixed dam's sucking (syntax error only, code is untested).
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install_steps_gtk.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 1d4d7a58c..1126f8fbc 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -537,8 +537,8 @@ sub installPackages { eval(cat_($pl)); my ($pix, undef) = gtkcreate_png($f); my $dbl_area; - my $darea = new Gtk::DrawingArea - gtkpack($box, $advertising = gtksignal_connect(gtkset_usize($darea, $width, eight), expose_event => sub { + my $darea = new Gtk::DrawingArea; + gtkpack($box, $advertising = gtksignal_connect(gtkset_usize($darea, $width, $height), expose_event => sub { if (!defined($dbl_area)) { $dbl_area = new Gtk::Gdk::Pixmap($darea->window, $width, $height); $dbl_area->draw_pixmap($darea->style->bg_gc('normal'), |