Update upstream source from tag 'upstream/2020.12.07'

[deb_pkgs/scowl.git] / src / remove-plurals

diff --git a/src/remove-plurals b/src/remove-plurals
index 97823bfab0f66acfc78e05dacee5e31b4c76782e..8357b04f11b9561cfcc7eb653188a74c3cff95bd 100755 (executable)
--- a/src/remove-plurals
+++ b/src/remove-plurals
@@ -31,7 +31,7 @@ if ($#ARGV == -1) {
     open $out, ">$ARGV[0]" or die;
 }
 
-foreach $w (keys lookup) 
+foreach $w (keys %lookup) 
 {
     my $dont_print = 0;
     foreach $s (&strip_plurel($w))