diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-12-06 15:05:00 +0100 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-12-06 15:05:00 +0100 |
| commit | 04cc12c27f9aabca5af41ca25d6d082831bd8ec1 (patch) | |
| tree | cf35ab32d565f9720ec7fa5c6660b4274687cdb5 /perl-install/ugtk3.pm | |
| parent | df2bad0dab355858bf78c073b2ee7262cd206512 (diff) | |
| download | drakx-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)
Diffstat (limited to 'perl-install/ugtk3.pm')
| -rw-r--r-- | perl-install/ugtk3.pm | 1 |
1 files changed, 1 insertions, 0 deletions
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; } |