Packages::Template::languages(): Do not die if no language name is defined

diff --git a/lib/Packages/Template.pm b/lib/Packages/Template.pm
index b48e69001543a98e83503231af09048e6a953a3d..1a6aa0cfb558478c647207cf009506d516e76c90 100644 (file)
--- a/lib/Packages/Template.pm
+++ b/lib/Packages/Template.pm
@@ -128,7 +128,8 @@ sub languages {
        my @printed_langs = ();
        foreach (@used_langs) {
            next if $_ eq $skip_lang; # Don't print the current language
-           unless (get_selfname($_)) { warn "missing language $_"; next } #DEBUG
+           unless (get_selfname($_)) { warn "missing language selfname $_"; next } #DEBUG
+           unless (get_language_name($_)) { warn "missing language name $_"; next } #DEBUG
            push @printed_langs, $_;
        }
        return [] unless scalar @printed_langs;