summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2013-12-06 15:05:00 +0100
committerThierry Vignaud <thierry.vignaud@gmail.com>2013-12-06 15:05:00 +0100
commit04cc12c27f9aabca5af41ca25d6d082831bd8ec1 (patch)
treecf35ab32d565f9720ec7fa5c6660b4274687cdb5
parentdf2bad0dab355858bf78c073b2ee7262cd206512 (diff)
downloaddrakx-04cc12c27f9aabca5af41ca25d6d082831bd8ec1.tar
drakx-04cc12c27f9aabca5af41ca25d6d082831bd8ec1.tar.gz
drakx-04cc12c27f9aabca5af41ca25d6d082831bd8ec1.tar.bz2
drakx-04cc12c27f9aabca5af41ca25d6d082831bd8ec1.tar.xz
drakx-04cc12c27f9aabca5af41ca25d6d082831bd8ec1.zip
fix a crash in rpmdrake when package list is empty (mga#11901)
-rw-r--r--perl-install/NEWS2
-rw-r--r--perl-install/ugtk3.pm1
2 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index d3d195ee2..60afabf72 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,5 @@
+- fix a crash in rpmdrake when package list is empty (mga#11901)
+
Version 16.8 - 5 December 2013
- prevent drakxtools-backend to require Glib::Object::Introspection (mga#11842)
diff --git a/perl-install/ugtk3.pm b/perl-install/ugtk3.pm
index 445c50780..24447d236 100644
--- a/perl-install/ugtk3.pm
+++ b/perl-install/ugtk3.pm
@@ -242,6 +242,7 @@ sub gtktreeview_children {
my @l;
$model or return;
my $p = $model->iter_children($iter);
+ $p or return;
while ($model->iter_next($p)) {
push @l, $p->copy;
}