po/bin/po2txt: Fix warning with Perl >= 5.12.

debian/changelog

@@ -1,6 +1,7 @@
 gfxboot-theme-ubuntu (0.13.0) UNRELEASED; urgency=low
 
   * Update translations from Launchpad.
+  * po/bin/po2txt: Fix warning with Perl >= 5.12.
 
  -- Colin Watson <cjwatson@ubuntu.com>  Wed, 11 Apr 2012 09:41:22 +0100
 

po/bin/po2txt

@@ -136,6 +136,7 @@ sub read_texts
       }
     }
     close F;
+    my (%txt_list, %txt_miss, %txt_unknown, %txt_multi);
     for (@txts) {
       $txt_list{$_}++;
       $txt_multi{$_} = 1 if $txt_list{$_} > 1;
@@ -147,7 +148,7 @@ sub read_texts
       $txt_miss{$_} = 1 unless exists $txt_list{$_};
     }
 
-    if(defined(%txt_miss) || defined(%txt_unknown) || defined(%txt_multi)) {
+    if(%txt_miss || %txt_unknown || %txt_multi) {
       print STDERR "$lang:\n";
       for (sort keys %txt_miss) {
         print STDERR "  missing: $_\n"