summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-03-08 09:04:03 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-03-08 09:04:03 +0000
commit9e01ec9a6633ca87c4910cbb68736ca45bcf49f4 (patch)
treed3cb051b36d31498d9a598a9728e6156791f95be /perl-install
parent5e3622b7ee5cd13987f3d0754d22eb19c13385fb (diff)
downloaddrakx-9e01ec9a6633ca87c4910cbb68736ca45bcf49f4.tar
drakx-9e01ec9a6633ca87c4910cbb68736ca45bcf49f4.tar.gz
drakx-9e01ec9a6633ca87c4910cbb68736ca45bcf49f4.tar.bz2
drakx-9e01ec9a6633ca87c4910cbb68736ca45bcf49f4.tar.xz
drakx-9e01ec9a6633ca87c4910cbb68736ca45bcf49f4.zip
(show_prev) fix crash on image drawing
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/draksplash2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash
index aba64745b..c5dc3a2ef 100755
--- a/perl-install/standalone/draksplash
+++ b/perl-install/standalone/draksplash
@@ -502,7 +502,7 @@ sub show_prev {
or $prev_canvas = new Gtk2::DrawingArea() and $prev_window->add($prev_canvas);
$prev_canvas->set_size_request($theme{res}{w}, $theme{res}{h});
$prev_canvas->signal_connect(expose_event => sub {
- $prev_canvas->window->draw_pixmap($prev_canvas->style->bg_gc('normal'),$prev_pix,0,0,0,0, $theme{res}{w}, $theme{res}{h});
+ $prev_pic->render_to_drawable($prev_canvas->window, $prev_canvas->style->fg_gc('normal'),0,0,0,0, $theme{res}{w}, $theme{res}{h}, 'normal', 0, 0);
$prev_canvas->window->draw_rectangle($prev_canvas->style->black_gc, $true,$txt_tl_x, $txt_tl_y,$txt_width,$txt_height);
$prev_canvas->window->draw_rectangle($prev_canvas->style->black_gc, $true, $prog_tl_x,$prog_tl_y,$prog_width, $prog_height);
});