summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2008-09-19 14:07:13 +0000
committerThierry Vignaud <tv@mandriva.org>2008-09-19 14:07:13 +0000
commit078ada16d53c6ae7baa42d7d3c1ae2aac7e2dcfe (patch)
treec303940409dc3ea11baa0fe3baeb79c8427b5f87
parentd55cb636fce5068edf122931a3b08c010db5f9bd (diff)
downloaddrakx-078ada16d53c6ae7baa42d7d3c1ae2aac7e2dcfe.tar
drakx-078ada16d53c6ae7baa42d7d3c1ae2aac7e2dcfe.tar.gz
drakx-078ada16d53c6ae7baa42d7d3c1ae2aac7e2dcfe.tar.bz2
drakx-078ada16d53c6ae7baa42d7d3c1ae2aac7e2dcfe.tar.xz
drakx-078ada16d53c6ae7baa42d7d3c1ae2aac7e2dcfe.zip
(create_steps_window) simplify left background filler: just use a
scaled image of last line of the background
-rw-r--r--perl-install/install/gtk.pm17
-rw-r--r--perl-install/share/left-background-filler.pngbin0 -> 885 bytes
2 files changed, 2 insertions, 15 deletions
diff --git a/perl-install/install/gtk.pm b/perl-install/install/gtk.pm
index 2574147ab..a738c3ca1 100644
--- a/perl-install/install/gtk.pm
+++ b/perl-install/install/gtk.pm
@@ -142,21 +142,8 @@ sub create_steps_window {
has_window => 1, x => 0, y => 0, height => $height, width => $::stepswidth, # -1
child => gtknew('VBox', spacing => 6, width => ($::stepswidth - $offset), children_tight => \@l));
- $o->{steps_widget}->put(my $da = gtknew('DrawingArea', width => $::stepswidth-11, widget_name => 'Left_background',
- height => 300, # prevent logo to be tiled (do mosazic style rendering)
- ), 0, $height);
-
- my $set_pixmap = sub {
- my ($darea) = @_;
- return if !$darea->realized;
- my $window = $da->window;
- my $pixmap = $da->{back_pixmap} ||= Gtk2::Gdk::Pixmap->new($window, 1, 1, $window->get_depth);
- my $style = $da->get_style;
- $pixmap->draw_points($style->base_gc('normal'), 0, 0);
- $window->set_back_pixmap($pixmap);
- $darea->queue_draw;
- };
- $da->signal_connect(realize => $set_pixmap);
+ # prevent logo to be tiled (do mosazic style rendering):
+ $o->{steps_widget}->put(gtknew('Image', file => 'left-background-filler.png'), 0, $height);
$o->{steps_widget}->put(
# FIXME: not RTL compliant (lang::text_direction_rtl() ? ...)
diff --git a/perl-install/share/left-background-filler.png b/perl-install/share/left-background-filler.png
new file mode 100644
index 000000000..264dd4966
--- /dev/null
+++ b/perl-install/share/left-background-filler.png
Binary files differ