diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-28 13:21:02 +0100 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-28 13:22:24 +0100 |
commit | 2f8ee0ef2b920ad8125b34339bce7b4f241e2812 (patch) | |
tree | f69257abbde1072db53e837cc52ac95d24434277 /perl-install | |
parent | 4d4666ef4068f7f7e9bf8fd7b376c407dddbe1b5 (diff) | |
download | drakx-2f8ee0ef2b920ad8125b34339bce7b4f241e2812.tar drakx-2f8ee0ef2b920ad8125b34339bce7b4f241e2812.tar.gz drakx-2f8ee0ef2b920ad8125b34339bce7b4f241e2812.tar.bz2 drakx-2f8ee0ef2b920ad8125b34339bce7b4f241e2812.tar.xz drakx-2f8ee0ef2b920ad8125b34339bce7b4f241e2812.zip |
use new Toolbar API (mga#11791)
old toolbar API is no more available:
Can't locate object method "append_item" via package Gtk3:Toolbar" at
ugtk3.pm line 954
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install/NEWS | 1 | ||||
-rw-r--r-- | perl-install/ugtk3.pm | 3 |
2 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 6474730bc..193d30c08 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,6 +1,7 @@ - fix a warning: include dialog-warning-symbolic - fix left panel text being black instead of white (mga#11792) - fix calling "child1_shrink" via package "Gtk3::HPaned" (mga#11797) +- fix using old toolbar API that is no more available (mga#11791) Version 16.0 - 23 November 2013 diff --git a/perl-install/ugtk3.pm b/perl-install/ugtk3.pm index dad860cb8..ce3db3e31 100644 --- a/perl-install/ugtk3.pm +++ b/perl-install/ugtk3.pm @@ -951,7 +951,8 @@ sub ask_browse_tree_info { } my %toolbar = @toolbar; foreach (grep_index { $::i % 2 == 0 } @toolbar) { - $toolbar->append_item(undef, $toolbar{$_}[0], undef, gtkcreate_img("$_.png"), $toolbar{$_}[1]); + my $t = gtknew('ToolButton', tooltip => $toolbar{$_}[0], file => "$_.png", clicked => $toolbar{$_}[1]); + $toolbar->insert($t, -1); } $pixcolumn->{is_pix} = 1; |