diff options
| -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; |