Fix formatting compact currencies of exactly one thousand in several locales (#1246)

* Add a smoke test for thousands and compact currency formats
* Fall back to other when formatting compact currencies

Author: bartbroere

babel/numbers.py

@@ -690,6 +690,8 @@ def _get_compact_format(
                 plural_form = "other"
             if number == 1 and "1" in compact_format:
                 plural_form = "1"
+            if str(magnitude) not in compact_format[plural_form]:
+                plural_form = "other"  # fall back to other as the implicit default
             format = compact_format[plural_form][str(magnitude)]
             number = rounded
             break

tests/test_smoke.py

@@ -17,6 +17,7 @@
     1.2 - 1.0,  # Inaccurate float
     10,  # Plain old integer
     0,  # Zero
+    1000,  # A thousand (previously raised KeyError in the nl locale for compact currencies)
 )
 
 
@@ -46,6 +47,8 @@ def test_smoke_numbers(locale):
         assert numbers.format_decimal(number, locale=locale, numbering_system="default")
         assert numbers.format_currency(number, "EUR", locale=locale)
         assert numbers.format_currency(number, "EUR", locale=locale, numbering_system="default")
+        assert numbers.format_compact_currency(number, "EUR", locale=locale)
+        assert numbers.format_compact_currency(number, "EUR", locale=locale, numbering_system="default")
         assert numbers.format_scientific(number, locale=locale)
         assert numbers.format_scientific(number, locale=locale, numbering_system="default")
         assert numbers.format_percent(number / 100, locale=locale)