X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FTemplate.pm;h=1a6aa0cfb558478c647207cf009506d516e76c90;hb=e9e5399ad699b724ed7d236b43f76b3ff85050bd;hp=c2919f1973de710a4f653fae67272f5a3edeee50;hpb=4fec9449ddf3d2a6162c05387367746f3e17e329;p=deb%2Fpackages.git

diff --git a/lib/Packages/Template.pm b/lib/Packages/Template.pm
index c2919f1..1a6aa0c 100644
--- a/lib/Packages/Template.pm
+++ b/lib/Packages/Template.pm
@@ -35,6 +35,7 @@ sub new {
     };
     $vars->{make_search_url} = sub { return &Packages::CGI::make_search_url(@_) };
     $vars->{make_url} = sub { return &Packages::CGI::make_url(@_) };
+    $vars->{g} = sub { my ($f, @a) = @_; return sprintf($f, @a); };
     if ($vars->{cat}) {
 	$vars->{g} = sub { return Packages::I18N::Locale::g($vars->{cat}, @_) };
     }
@@ -127,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;