From 2ed55ac55c777b39d8819cfdb9c4054dcc2825d3 Mon Sep 17 00:00:00 2001
From: Laura Arjona Reina <larjona>
Date: Fri, 4 May 2018 10:38:15 +0000
Subject: Add line to the database only if it includes content. Thus, avoid
 "Use of uninitialized value in hash element" errors

CVS version numbers

Perl/Debian/L10n/Db.pm: 1.8 -> 1.9
---
 Perl/Debian/L10n/Db.pm | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'Perl')

diff --git a/Perl/Debian/L10n/Db.pm b/Perl/Debian/L10n/Db.pm
index 1dcc3ce8756..705d52280c2 100644
--- a/Perl/Debian/L10n/Db.pm
+++ b/Perl/Debian/L10n/Db.pm
@@ -260,7 +260,9 @@ sub read {
                                 $entry->{$_} = \@list;
                         }
                 }
+                if (defined $entry) {
                 $self->{data}->{$entry->{Package}} = $entry;
+                }
                 last if $last_item;
         }
         close DB;
-- 
cgit v1.2.3