diff --git a/harbour/ChangeLog b/harbour/ChangeLog index d3a9d51ae8..4bd835c9ff 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -17,6 +17,10 @@ past entries belonging to author(s): Viktor Szakats. */ +2009-11-13 14:28 UTC+0200 Mindaugas Kavaliauskas (dbtopas/at/dbtopas.lt) + * harbour/src/rtl/hbi18n1.c + ! fixed Lithuanian plural form index + 2009-11-12 16:21 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) * INSTALL * Updated dev list max attachment size. diff --git a/harbour/src/rtl/hbi18n1.c b/harbour/src/rtl/hbi18n1.c index 0f68f33ff1..8414a58ccb 100644 --- a/harbour/src/rtl/hbi18n1.c +++ b/harbour/src/rtl/hbi18n1.c @@ -183,7 +183,7 @@ static long hb_i18n_pluralindex( int iForm, PHB_ITEM pNum ) case HB_I18N_PLURAL_LT: n10 = fmod( n, 10.0 ); n100 = fmod( n, 100.0 ); - return n100 >= 10 && n100 < 20 ? 2 : ( n10 == 1 ? 1 : 3 ); + return n10 == 1 && n100 != 11 ? 1 : (n10 != 0 && (n100 < 10 || n100 >= 20) ? 2 : 3); case HB_I18N_PLURAL_EN: default: