ofs | hex dump | ascii | ||||||
---|---|---|---|---|---|---|---|---|
0000 | 7f 45 4c 46 02 01 01 00 00 00 00 00 00 00 00 00 02 00 3e 00 01 00 00 00 e8 00 40 00 00 00 00 00 | .ELF..............>.......@..... | ||||||
0020 | 40 00 00 00 00 00 00 00 90 1f 01 00 00 00 00 00 00 00 00 00 40 00 38 00 03 00 40 00 07 00 06 00 | @...................@.8...@..... | ||||||
0040 | 01 00 00 00 05 00 00 00 00 00 00 00 00 00 00 00 00 00 40 00 00 00 00 00 00 00 40 00 00 00 00 00 | ..................@.......@..... | ||||||
0060 | f0 15 01 00 00 00 00 00 f0 15 01 00 00 00 00 00 00 00 10 00 00 00 00 00 01 00 00 00 06 00 00 00 | ................................ | ||||||
0080 | 00 16 01 00 00 00 00 00 00 16 51 00 00 00 00 00 00 16 51 00 00 00 00 00 50 09 00 00 00 00 00 00 | ..........Q.......Q.....P....... | ||||||
00a0 | e0 32 00 00 00 00 00 00 00 00 10 00 00 00 00 00 51 e5 74 64 07 00 00 00 00 00 00 00 00 00 00 00 | .2..............Q.td............ | ||||||
00c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ | ||||||
00e0 | 08 00 00 00 00 00 00 00 5f 48 89 e6 57 48 8d 54 fe 08 48 89 15 37 36 11 00 e8 da 85 00 00 48 89 | ........_H..WH.T..H..76.......H. | ||||||
0100 | c7 e8 d3 91 00 00 f4 90 55 31 d2 83 ff e4 48 89 e5 0f 94 c2 41 54 45 31 e4 83 ff 1c 53 41 0f 94 | ........U1....H.....ATE1....SA.. | ||||||
0120 | c4 89 fb 44 09 e2 51 51 48 c7 45 e8 00 00 00 00 74 26 48 8d 55 e8 31 ff 31 c0 be 13 54 00 00 e8 | ...D..QQH.E.....t&H.U.1.1...T... | ||||||
0140 | d4 8d 00 00 0f b7 45 ea 66 85 c0 74 0b 0f b7 f8 44 89 e6 e8 7d 03 00 00 83 fb e4 75 18 be 08 01 | ......E.f..t....D...}......u.... | ||||||
0160 | 40 00 bf 1c 00 00 00 e8 dc 97 00 00 48 89 05 05 1e 11 00 eb 1b 83 fb 1c be 08 01 40 00 74 07 48 | @...........H..............@.t.H | ||||||
0180 | 8b 35 f2 1d 11 00 bf 1c 00 00 00 e8 b8 97 00 00 58 5a 5b 41 5c c9 c3 55 8b 05 d6 1d 11 00 48 89 | .5..............XZ[A\..U......H. | ||||||
01a0 |
-rw-r--r-- | perl-install/install_steps_gtk.pm | 50 |
1 files changed, 26 insertions, 24 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index bed9318dd..175ece0ea 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -541,30 +541,32 @@ sub installPackages { my ($pix, undef) = gtkcreate_png($f); my $dbl_area; 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'), - $pix, 0, 0, $width, $height); - my $font = $darea->style->font; - my $style= new Gtk::Style; - $style->font(Gtk::Gdk::Font->fontset_load($font)); - my $gc_text = new Gtk::Gdk::GC($darea->window); - $gc_text->set_foreground(gtkcolor(255, 255, 255)); - foreach (@data) { - my ($width, $height, $lines, $widths, $heights, $ascents, $descents) = get_text_coord ( - $_->[0], $style, $_->[3], $_->[4], 1, 0, 1, 1); - my $i = 0; - foreach (@{$lines}) { - $dbl_area->draw_string($style->font, $gc_text, ${$widths}[$i], ${$ascents}[$i] + ${$heights}[$i], $_); - $i++; - } - } - } else { - $darea->window->draw_pixmap($darea->style->bg_gc('normal'), - $dbl_area, 0, 0, 0, 0, $width, $height); - } - })); + gtkpack($box, $advertising = gtksignal_connect(gtkset_usize($darea, $width, $height), expose_event => sub { + eval { + if (!defined($dbl_area)) { + $dbl_area = new Gtk::Gdk::Pixmap($darea->window, $width, $height); + $dbl_area->draw_pixmap($darea->style->bg_gc('normal'), + $pix, 0, 0, $width, $height); + my $font = $darea->style->font; + my $style= new Gtk::Style; + $style->font(Gtk::Gdk::Font->fontset_load($font)); + my $gc_text = new Gtk::Gdk::GC($darea->window); + $gc_text->set_foreground(gtkcolor(255, 255, 255)); + foreach (@data) { + my ($width, $height, $lines, $widths, $heights, $ascents, $descents) = + get_text_coord ($_->[0], $style, $_->[3], $_->[4], 1, 0, 1, 1); + my $i = 0; + foreach (@{$lines}) { + $dbl_area->draw_string($style->font, $gc_text, + ${$widths}[$i], ${$ascents}[$i] + ${$heights}[$i], $_); + $i++; + } + } + } else { + $darea->window->draw_pixmap($darea->style->bg_gc('normal'), + $dbl_area, 0, 0, 0, 0, $width, $height); + } + }})); } } else { $advertising = undef; |